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Prefazione 


Linguaggi evoluti, quali il BASIC e il FORTRAN, benché siano di 
impiego assai frequente nella programmazione dei microcalcolatori, 
non pertanto sono esenti da gravi limitazioni. Essi presentano notevoli 
difficoltà di adattamento nell’acquisizione a grande velocità dei dati, nei 
controlli di processo e nell’elaborazione dei dati, oppure con dispositivi 
periferici di qualche complessità fondati su tecniche di interruzione. 
Queste ragioni giustificano da sole l’impiego ancora diffuso del linguag¬ 
gio assembler nella programmazione dei microcalcolatori. 

Con il linguaggio assemblatore, ciò che compie in pratica il program¬ 
matore è la memorizzazione di istruzioni e di codici corrispondenti ai 
dati nella memoria del microcomputer. Le istruzioni memorizzate coin¬ 
cidono con le istruzioni che il circuito integrato del microprocessore è in 
grado di compiere effettivamente in base al modo in cui esso è stato 
progettato. Nel caso dell’8080 e dell’8085, il sei di istruzioni di questi due 
microprocessori è quello stabilito dalla Intel Corporation. Quando si 
procede alla memorizzazione delle istruzioni e dei valori relativi ai dati, 
questi sono memorizzati come sequenze di uni e zeri logici. Per molti 
microprocessori attualmente di larga diffusione, otto stati o livelli logici 
del genere sono combinati in modo da costituire una parola o byte di 8 
bit. Ciascuna di queste parole o byte di 8 bit è dunque memorizzata in 
una ben precisa locazione di memoria. Nel caso si dovesse procedere alla 
programmazione di un microcalcolatore servendosi di parole di 8 bit 
costituiti da uni e zeri, sarebbe assai difficile scrivere un programma di 
200 o 300 istruzioni, per poi memorizzarlo nel microcalcolatore, per il 
semplice motivo che sarebbe problematico il ricordarsi le corrispon¬ 
denze tra le istruzioni o i valori dei dati e le varie sequenze di uni e zeri. 
Nel caso che si programmi un microcalcolatore in questo modo, si dice 
che esso è programmato servendosi del linguaggio macchina. 
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Anziché programmare il microcalcolatore in linguaggio macchina, 
difficile da impiegare e ricordare, si preferisce ricorrere al linguaggio 
assemblatore. Il linguaggio assemblatore corrisponde all’impiego di 
sequenze brevi di caratteri alfanumerici come MOVAB ed RLC, in 
qualità di simboli per una particolare sequenza di operazioni eseguibili 
dal microcalcolatore. L’8080 e P8085, ad esempio , sono in grado di 
eseguire l’istruzione “sposta il contenuto di 8 bit del registro B nel 
registro A ad 8 bit”. Sarebbe, in ogni caso, assai difficile scrivere un 
programma rappresentando ogni istruzione con una descrizione tanto 
“prolissa”. Si preferisce, perciò, valersi di simboli mnemonici consistenti, 
in pratica, in abbreviazioni aventi riferimento con la (e) operazione (i) che 
il microcalcolatore deve eseguire. Il simbolo mnemonico relativo all’i¬ 
struzione descritta in precedenza è MOVAB. Analogamente il simbolo 
RLC rappresenta l'istruzione “fai ruotare di un posto a sinistra il conte¬ 
nuto di 8 bit del registro A". Come si può ben immaginare, non è 
possibile memorizzare nella memoria del microcalcolatore i simboli 
MOVAB ed RLC e quindi pretendere che il microcalcolatore esegua tali 
“istruzioni". È, invece, necessario caricare nella memoria del microcal¬ 
colatore le istruzioni scritte in linguaggio macchina, 01111000 e 
00000111. 

Molto opportunamente i fabbricanti di microprocessori forniscono 
l'elenco di tutti i simboli di istruzione relativi a ciascun microprocessore, 
unitamente ai codici ad essi corrispondenti in linguaggio macchina. 
Grazie a ciò è possibile scrivere un programma in forma simbolica, 
tradurre i simboli di istruzione in linguaggio macchina e porre nella 
memoria del microcalcolatore gli opportuni codici di linguaggio mac¬ 
china. E evidente il vantaggio per l’utente, che può in questo modo avere 
sottocchio il listing del programma simbolico e rendersi conto di ciò che 
il microcalcolatore sta per eseguire, invece di dover analizzare una lunga 
sequenza di uni e zeri. 

L’impiego dei simboli di istruzione porta a scrivere il programma in 
linguaggio assembler. Il procedimento, tuttavia, di scrivere (editing) i 
simboli delle varie istruzioni e poi di tradurli (assembling) nei corrispon¬ 
denti codici in linguaggio macchina può risultare un lavoro laborioso, 
monotono e soggetto agli sbagli. Gli editor e gli assembler sono stati 
creati appositamente per essere utilizzati nella generazione di pro¬ 
grammi in linguaggio assembler per i microcalcolatori. 

Un editor non è che un programma avente la funzione di manipolare 
dei caratteri memorizzati in memoria, oppure su cassetta registrata, su 
nastro perforato o su floppy disk. Di solito, i caratteri ai quali l’editor 
accede per manipolarli sono posti inizialmente in ingresso al micropro¬ 
cessore da parte di un programmatore che si vale di un’apposita tastiera. 
I caratteri o sequenze di caratteri possono consistere in simboli di 
istruzione (ADDX, INXH o CALL) oppure possono addirittura far 
parte di una lettera (Cari Sherida e Fred). L’editor non ha modo di 
conoscere, e d’altronde non è affare che lo riguardi, la natura della 
sequenza di caratteri introdotti. Comunque, una volta che i caratteri 
sono stati introdotti in memoria, l’editor permette all’utente di cancel- 


4 



lare, inserire, ricercare, scambiare, elencare e riporre qualunque 
sequenza (stringa) di caratteri. 

L’impiego dell’assembler permette di tradurre le stringhe di caratteri 
in codici eseguibili dalla macchina. È evidente che la traduzione avviene 
solamente per certe stringhe. Mentre, cioè, i simboli MOVAB, RLC, 
1NXH, insieme a molti altri, possono essere tradotti in codici eseguibili 
dalla macchina, non può essere tradotto “Cari Sherida e Fred”. Perciò, 
nel caso che si chieda all’assemblar di tradurre questo simbolo di istru¬ 
zione, esso genererà un qualche tipo di messaggio di errore. Anche se 
l’editor è in grado di manipolare qualunque sequenza di caratteri si 
desideri, questo non vuol dire che l’assembler sia poi in grado di proce¬ 
dere alla sua traduzione. Esso, in realtà può tradurre unicamente 
sequenze di caratteri molto particolari, rigorosamente definite. In que¬ 
sto libro ci si propone di illustrare l’impiego del Tychen’s Editor- 
Assembler (editore assemblatore della Tychen (TEA) per generare ed 
assemblare dei programmi in linguaggio assembler. TEA consiste in un 
editor-assembler co-residente, per via del fatto che l’editor e l’assembler 
sono presenti in memoria simultaneamente. Una volta introdotto in 
memoria per mezzo dell'editor un programma sorgente, cioè una 
sequenza di simboli di istruzione, si può passare il controllo all’assem- 
bler in modo da generare una versione del programma in linguaggio 
macchina. 

Il numero dei libri appartenenti alla “Blacksburg Continuing Educa- 
tion Series” (collana di Blacksburg per l’educazione permanente) si 
incrementa rapidamente. I titoli dei libri attualmente disponibili sono 
elencati in seconda pagina di copertina. Tra i testi in preparazione ve ne 
sono alcuni dedicati alla programmazione e interfacciamento del 6800, 
del 6502 e dello Z80. L’editore è sempre interessato a stabilire dei 
contatti e a collaborare con autori che ritengano che i concetti da essi 
sviluppati nelle loro opere siano in linea con il taglio di questa collana. Se 
chi legge coltiva degli interessi che gli farebbe piacere sviluppare, è 
pregato di mettersi in contatto con il centro di Blacksburg. 

Questi testi hanno riscosso notevole successo e raggiunto una vasta 
diffusione in tutto il mondo sia in classi di tipo tradizionale che presso 
singoli utenti. Una scelta di essi è in corso di traduzione in tedesco, 
spagnolo, giapponese, francese, italiano, cinese e malese. Gli interessati 
ad ottenere maggiori particolari al riguardo di queste traduzioni oppure 
a tradurre i libri in altre lingue, sono vivamente pregati di rivolgersi a 


CHRISTOPHER A. TITUS, 

“The Blacksburg Group” (gruppo di Blacksburg) 
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Prefazione all’edizione 
italiana 


Quanti utilizzano oggi un microprocessore 8080 o 8085 nelle proprie ap¬ 
plicazioni? Molti. Quanti hanno a disposizione strumenti software per la 
compilazione dei programmi? Pochi. 

11 programma TEA, il cui listing è riportato nell’ultima appendice di 
questo volume è senza dubbio un valido contributo per tutti coloro che 
operano con i suddetti microprocessori. 

Esso infatti, una volta caricato su un supporto di memoria, dà la possibi¬ 
lità di scrivere e modificare programmi sorgente scritti in assembler se¬ 
condo i codici mnemonici di questi due microprocessori. 

Oltre a ciò si utilizza in pieno la caratteristica fondamentale del linguag¬ 
gio assembler, ossia di essere un linguaggio di tipo uno ad uno, in quanto 
a ogni istruzione simbolica corrisponde una istruzione in linguaggio 
macchina. 

Questo significa un’alta velocità di esecuzione dei programmi, che mol¬ 
to spesso è richiesta nelle applicazioni con microprocessori. 

Ci auguriamo che questo volume contribuisca ad aumentare la produ¬ 
zione di software ed a supportare quei tecnici software di microproces¬ 
sori sempre più necessari in un crescendo sviluppo delle applicazioni di 
sistemi utilizzanti microprocessori. 
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CAPITOLO 1 


Modalità di impiego dell’Editor 


INTRODUZIONE 

La funzione dell’Editor - Assembler Tychen (Tychen Editor - Assem¬ 
bler TEA) è quella di creare, modificare ed assemblare programmi 
simbolici (sorgenti). Per introdurre in memoria un programma simbo¬ 
lico (cioè una sequenza di simboli mnemonici) ci si può valere di una 
tastiera ASCII, di un lettore di banda perforata o di un registratore a 
cassetta. Una volta introdotto il programma, l’impiego di TEA permette 
di aggiungere, cancellare o modificare linee di testo contenute nel pro¬ 
gramma simbolico. Per ottenere tale risultato, l’utente non ha che da 
introdurre un comando di una sola lettera, seguito da uno oppure due 
numeri di linea; in alternativa, si può introdurre in primo luogo il 
comando e, quindi, premere il tasto RETURN. 

Il programma destinato ad essere assemblato da TEA può risiedere 
nella sua totalità in memoria oppure può essere spezzato in blocchi 
diversi memorizzati su nastro. Non esiste virtualmente alcun limite alla 
dimensione dei programmi che si possono assemblare grazie a TEA. È, 
cioè, possibile introdurre 100 o 200 linee del programma sorgente proce¬ 
dere all’editing delle relative linee e quindi riporle su nastro perforato. A 
questo punto tutto il testo deve essere cancellato in modo che sia 
possibile procedere all’introduzione e all’editing delle successive 100 o 
200 linee di testo. E opportuno che la lunghezza di tali blocchi sia 
mantenuta tra le 100 e le 200 linee, in quanto, così facendo, la correzione 
degli errori di un blocco si riduce alla lettura di una banda abbastanza 
breve, contrariamente al caso che il programma sia stato spezzato in 
lunghi blocchi di 500 o 600 linee; blocchi più estesi significano, infatti, 
tempi più lunghi di letture, editing e perforazione della versione corretta. 

Ogni volta che l’utente preme il tasto RETURN, avviene l’introdu¬ 
zione di una linea di testo nel text buffer (o buffer del testo). La prima 
linea di testo è la linea 1. Mano a mano che avviene l’introduzione del 
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testo, TEA provvede automaticamente a generare i numeri di linea, 
stampandoli in uscita prima che l’utente possa introdurre del testo. Ne 
consegue che, mentre si procede all’introduzione del testo, non vi è mai 
alcun bisogno di battere un numero di linea da far precedere alla linea di 
testo. Anche nel caso che si desiderino introdurre o cancellare linee di 
testo nel corso della procedura di editing TEA procederà automatica- 
mente a cambiare la numerazione di tutte le linee. Poiché la massima 
capacità del text buffer in un qualsiasi momento è pari a 9999 linee di 
testo, qualunque riferimento ad una linea di testo prevede il ricorso ad 
un numero di linea compreso tra 1 e 9999. È d’altronde improbabile che 
vi siano utenti la cui dotazione di memoria R/W (read/write: a lettura- 
/scrittura) sia tale da permettere loro di memorizzare testi con più di 
9999 linee. 

La porzione assembler di TEA ha la funzione di convertire programmi 
sorgente (espressioni mnemoniche) in programmi oggetto (valori binari 
propri del linguaggio macchina). Un programma oggetto non consiste in 
altro che nella versione ‘assemblata’ del programma stesso ed è suscetti¬ 
bile di esecuzione direna da parte del microcalcolatore 8080. Nel corso 
del procedimento di assemblaggio, l’impiego di TEA consente di perfo¬ 
rare un nastro in codice binario (programma oggetto) e di stampare una 
versione ‘assemblata’ del programma stesso, completa di indirizzi in 
memoria e di valori binari corrispondenti alle espressioni mnemoniche. 
TEA può, inoltre, provvedere all’essemblaggio del programma cari¬ 
cando la memoria R/W con una sua versione eseguibile direttamente. 
Come già detto, TEA può provvedere sia all’assemblaggio del pro¬ 
gramma sorgente preventivamente caricato in memoria, sia leggerne una 
linea alla volta da un dispositivo periferico e assemblarla. 

TEA consiste in un programma assemblatore (assembler) a tre pas¬ 
sate. Esso cioè, esamina tre volte tutti i caratteri contenuti nel buffer del 
testo oppure tutti i caratteri perforati su di un nastro. 

Nel corso della prima passata, assembler di TEA dispone gli indirizzi 
simbolici come definiti dall’utente in un’apposita tabella degli indirizzi 
simbolici, unitamente all’indirizzo a 16 bit corrispondente alla loro 
“posizione” nel programma. Con la seconda passata, tutte le parole ed i 
byte definiti dall’utente sono collocati in apposite tabelle, mentre le 
espressioni mnemoniche contenute nel programma sono interpretate ed 
i loro equivalenti in codice binario sono perforati su banda o trascini su 
audiocassetta. Nel corso di questa passata, inoltre, TEA permette di 
caricare automaticamente la memoria R/W con questi medesimi codici 
binari equivalenti. Perciò l’utente ha la possibilità effettiva di dar corso 
all’esecuzione del programma già a partire dal completamento della 
seconda passata. La funzione della terza passata è quella di dar luogo ad 
un listing ‘assemblato’ del programma. 

Questo consiste in uno stampato linea dopo linea relativo al pro¬ 
gramma dell’utente, completo di indirizzi, di codice operativo dell’e¬ 
spressione mnemonica contenuta nella linea di testo, nonché commenti 
vari redatti dall’utente. Il listing relativo alla terza passata può essere 
ottenuto sia in ottale che in esadecimale, a seconda del sistema di 
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numerazione preferito. La conversione di TEA dal modo ottale a quello 
esadecimale, e viceversa, non presenta, infatti, nessuna difficoltà. 

Un’altra importante caratteristica di TEA è quella di essere indipen¬ 
dente dal dispositivo di I/O. Da questo dipende l’estrema facilità con cui 
TEA può essere modificato in modo da comunicare con un registratore 
per audiocassette anziché con un lettore/perforatore di banda. In 
accordo con l’aggiunta o l’eliminazione di dispositivi di I/O dal sistema 
microcalcolatore basato sull’8080, è facile modificare TEA per adattarlo 
a questi dispositivi nuovi o semplicemente diversi. Anche nel caso in cui 
TEA risieda in ROM, la conversione da un dispositivo di I/O all’altro è 
soltanto questione di pochi secondi. 

MEMORIA OCCORRENTE 

Lo spazio complessivo di memoria occupato da TEA consiste in poco 
più di 6K di memoria lettura/scrittura (read/write: R/W) ovvero di 
memoria programmable a sola lettura (programmabile read-only 
memory: PROM). Inoltre, per lo stack, una memoria temporanea ed 
alcuni buffer è necessaria una sezione di memoria R/W per complessive 
384 locazioni, mentre la restante parte di memoria R/W può essere 
utilizzata per la memorizzazione del testo. Allorché si dà il via iniziale a 
TEA, esso fa richiesta all’utente degli indirizzi iniziale e finali utilizzabili 
dal text buffer. Tali indirizzi “limite” possono essere cambiati in qualun¬ 
que momento per creare lo spazio occorrente a programmi di lunghezza 
differente. Nella pratica, il cambiamento dei limiti in memoria permette 
di memorizzare simultaneamente in memoria R/W tre, quattro o più 
programmi indipendenti. Considerando le dimensioni di TEA e della 
memoria scratch-pad necessaria, l’impiego di TEA per editare ed assem¬ 
blare programmi con un qualche dispositivo di I/O tipo una telescri¬ 
vente un terminale a raggi catodici (cathode-ray-terminal: CRT) o 
un’audio cassetta rende necessario il disporre di almeno 8K di memoria. 
L’indirizzo nominale di partenza di TEA è 000 000 (0000 esadecimale). 

L’EDITOR 

TEA è composto fondamentalmente da due programmi indipendenti, 
un editor simbolico e un assembler. L’editor interno a TEA permette 
all’utente di trattare caratteri singoli e stringhe di caratteri presenti nel 
text buffer. Il completo corredo delle istruzioni a disposizione permet¬ 
tono di utilizzare l’editor per aggiungere, elencare, perforare, investi¬ 
gare, interscambiare, inserire, cancellare o apportare variazioni a linee di 
testo contenute nel text buffer. È questo un editor orientato alla linea 
(line-oriented), in quanto l’unità minima di testo su cui esso normal¬ 
mente opera è per l’appunto una linea di testo completa. E, tuttavia, 
sempre possibile ricorrere all’istruzione di scambio con carattere 
(stringa) per cambiare una sola lettera nel bel mezzo di una linea di testo. 
Se si fosse utilizzato un editor orientato al carattere, la variazione di 
caratteri singoli o di stringa isolate di caratteri sarebbe quanto mai 
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agevole. Tali editor orientati al carattere presentano, tuttavia, l’inconve¬ 
niente di necessitare di un CRT indirizzabile mediante cursore. La nostra 
scelta di incorporare in TEA un editor orientato alla linea dipende dal 
fatto che i terminali di questo genere sono molto meno comuni delle 
semplici telescriventi seriali asincrone o dei normali CRT. Mentre questo 
capitolo è dedicato al funzionamento dell’editor, nel Capitolo 2 si trat¬ 
terrà dell’assembler facente parte di TEA. 

STRUTTURA DELLE ISTRUZIONI 

Le possibili istruzioni relative a TEA sono di tre tipi. Esse (^control¬ 
lano il metodo secondo cui TEA deve operare, (2) rendono possibili i 
cambiamenti del text buffer e (3) consentono di accedere ad esso senza 
che intervenga alcun cambiamento. Le istruzioni più semplici sono 
quelle che si riferiscono al controllo. Esse sono sei e sono descritte nei 
paragrafi che seguono. 

ISTRUZIONI RELATIVE AL CONTROLLO 

1. La lettera O è il simbolo impiegato per il comando OCTAL. Quando 
TEA risponde con C=, è sufficente premere il tasto O per portare TEA 
nel modo di funzionamento OCTAL. TEA risponderà a questo punto 
con C=, per cui l’utente può introdurre il comando successivoSJl fatto di 
porre TEA nel modo OCTAL fa sì che il listing prodotto nel corso della 
terza passata dell’assembler contenga indirizzi e dati informativi in 
forma ottale prescindendo dal genere dei numeri utilizzati in un pro¬ 
gramma. 

Quando si introduce il comando Q (QUERY), i limiti della memoria 
sono stampati in uscita sotto forma di relativi indirizzi di memoria in 
ottale. Di seguito è riportato il formato relativo a questo comando. 

C = O Per introdurre questo comando non vi è bisogno di pre¬ 
mere il tasto RETURN (1). 

2. La lettera H è il simbolo impiegato per il comando HEXADECI- 
MAL (esadecimale). Quando TEA risponde con C=, è sufficiente pre¬ 
mere il tasto H per porre TEA nel modo di funzionamento HEXADE- 
CIMAL. 

TEA risponderà a questo punto con C=, per cui l’utente potrà intro¬ 
durre il proprio comando successivo. Il fatto di porre TEA nel modo 
HEXADECIMAL fa sì che il listing prodotto nel corso della terza 
passata dell’assembler ed i limiti della memoria stampati in base la 
comando Q (Query) saranno espressi con numeri esadecimali. 

C = H Per introdurre questo comando non vi è bisogno di pre¬ 
mere il tasto RETURN (l). 

3. La lettera M è il simbolo impiegato per il comando MEMORY. 
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Quando TEA risponde con C=, è sufficiente premere il tasto M perchè 
TEA permetta all’utente di introdurre nuovi limiti iniziale e finale per gli 
indirizzi di memoria adibita a text buffer. Questo permette all’utente di 
maggiorare le dimensioni del buffer oppure di stabilirne uno nuovo da 
destinare ad un secondo programma ovvero ad un programma aggiun¬ 
tivo. Quando TEA risponde con 1N1TIAL ADDRESS?, si preme il tasto 
O (per ottale) oppure quello H (per esadecimale) seguito rispettivamente 
da un numero ottale di sei cifre oppure da uno esadecimale di quattro 
cifre, che sarà assunto quale indirizzo iniziale del buffer. Nel caso che 
siano introdotti dei caratteri ottali o esadecimali non validi, il pro¬ 
gramma si limita a non prenderli in considerazione. 

Si faccia l’ipotesi che si desideri utilizzare TEA per generare un 
programma da spedire ad un monitor di sistema oppure ad un debugger 
per la sua esecuzione effettiva. Una volta eseguito il programma, si 
voglia ripetere TEA una seconda volta allo scopo di correggere gli errori 
eventualmente contenuti nel programma. Quando TEA è fatto ripartire 
da 000 000, esso farà nuovamente richiesta degli indirizzi iniziale e finale 
del text buffer, ma l’utente non avrà alcun bisogno di ricordare gli 
indirizzi precedentemente introdotti. Sarà infatti sufficiente, al 
momento in cui TEA pone la domanda relativa a tali indirizzi iniziale e 
finale, premere il tasto RETURN. TEA utilizzerà allora gli indirizzi 
precedentemente introdotti e chiederà se esiste per caso una sorgente in 
memoria, al che l’utente risponderà con Y per YES. Di ciò si tratterà più 
a fondo nella sezione successiva di questo capitolo. 

Allorché si ricorre al comando M oppure si fissano inizialmente i 
confini del text buffer al momento di far partire TEA, quest’ultimo 
utilizza automaticamente la prima locazione di memoria riservata al 
buffer. Se, ad esempio l’indirizzo iniziale è 040 000 (2000 esadecimale), 
TEA si servirà di questa locazione di memoria. 

La successiva locazione di memoria, 040 001 (2001 esadecimale), è, 
perciò la prima locazione di memoria utilizzabile per la memorizzazione 
del testo. 

C = M Dopo aver premuto il tasto M non vi è alcun bisogno di 
premere il tasto RETURN (1). 

4. La lettera R è il simbolo impiegato per il comando READER 
(lettore). Quando TEA risponde con C=, è sufficiente premere il tasto R 
perchè avvenga l’introduzione del testo nel buffer destinato ad esso con 
provenienza dal dispositivo di I/O designato come dispositivo di lettura, 
quale esempio, un’audip-cassetta, un lettore di nastro, ovvero un floppy 
disk. Una volta abilitato il dispositivo di I/O con il comando R, l’intro¬ 
duzione del testo nel suo buffer avviene con le modalità disponibili in 
base ai comandi A (APPEND: assegna), I (INSERT: inserisci) ovvero C 
(CH ANGE: cambia), le cui caratteristiche saranno descritte tra breve. // 
dispositivo di lettura sarà disabilitato soltanto quando alla fine de! nastro o 
dell’audio-cassetta si leggerà CTRL/C. Una volta disabilitato quest’ul¬ 
timo, il testo può essere introdotto dalla telescrivente o dal CRT, i 
dispositivi di I/O maggiormente utilizzati per l’ingresso del testo. 
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C = R Per dar luogo all’esecuzione del comando non è necessa¬ 
rio premere il tasto RETURN (1) dopo aver premuto 
quello R. 

5. La lettera B è il simbolo impiegato per il comando BOOTSTRAP. 
La funzione di tale comando è quella di far leggere in memoria la 
versione ‘assemblata’ (linguaggio macchina; oggetto) del programma in 
vista della sua esecuzione. Se, durante il procedimento di assemblaggio il 
caricamento della versione oggetto in memoria avviene automatica- 
mente , il ricorso a questo comando non ha più ragione d’essere. 

C = B Dopo aver premuto il tasto B non vi è alcun bisogno di 
premere il tasto RETURN (l). 

6. La lettera Z è il simbolo impiegato per il comando EXIT, comando 
precisato dall’utente. Quando, infatti, si preme il tasto Z, il microproces¬ 
sore 8080, oppure 8085, effettua un salto ad un altro programma già 
caricato in memoria. Una delle funzioni di questo comando è, perciò, 
quella di uscire verso un monitor di sistema o un debugger. 

C = Z Dopo aver premuto il tasto Z non vi è alcun bisogno di 
premere di seguito il tasto RETURN (l). 


COMANDI CHE ALTERANO IL TEXT BUFFER 

I comandi utilizzabili per alterare il contenuto del text buffer sono 
soltanto cinque. Questa sezione tratta, per l’appunto, dei quattro 
comandi più semplici e di uso più frequente. L’impiego di tali comandi 
permette di compiere delle aggiunte al termine del text buffer (A; 
APPEND: aggiungere), inserire del testo di fronte ad una certa linea di 
testo (I; INSERT: inserire), cambiare una linea di testo (C; CHANGE: 
cambiare) e cancellare una o più linee di testo (D; DELETE: cancellare). 

Nel corso di queste sezione del capitolo saranno trattati i vari comandi 
che determinano la possibilità di alterare il contenuto del text buffer. 
TEA, perciò, sarà visto operare sia nel modo di comando che nel modo di 
testo. Nel primo di questi due modi, i vari comandi possono essere 
introdotti in TEA e quindi eseguiti con le modalità già osservate nella 
sezione precedente. Compiuta l’esecuzione del comando, TEA ritorna al 
modo di comando per permetterne l’introduzione di uno nuovo 
comando, tenendo, tuttavia, conto che molti comandi presi in considera¬ 
zione fan si che TEA passi al modo di testo. Secondo questa procedura, 
da un dispositivo di I/O si possono introdurre dei caratteri nel text 
buffer e, in tale sede, questi medesimi caratteri possono essere modificati 
o cancellati. Il fatto importante è che i caratteri non sono interpretati 
come comandi, poiché TEA non ha alcuna nozione su ciò che è intro¬ 
dotto nel buffer, e d’altronde non è affar suo. Soltanto l’introduzione di 
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un CTRL/C fa sì che TEA esca dal modo di testo e torni a quello di 
comando in modo che nuovi comandi possano essere introdotti c le 
opportune azioni eseguite. Quando si introduce un CTRL/C, TEA 
risponde con un ?, C =, al che un nuovo comando può essere introdotto. 


Append 

7. La lettera A costituisce il comando APPEND (aggiungere). Quando 
TEA risponde con C =, è sufficiente premere il tasto A per portare TEA 
nel modo di testo secondo cui al testo presente nell’apposito buffer può 
essere posto in appendice dell’altro testo. Il formato del comando A 
(APPEND) è riprodotto di seguito. 

C = A Dopo aver premuto il tasto A non vi è necessità di 
premere di-seguito il tasto RETURN (1). TEA passerà 
comunque nel modo operativo di testo e vi rimarrà sin¬ 
tantoché non sia introdotto un CTRL/C. 

La funzione di questo comando è quella di creare un buffer iniziale 
nonché di compiere aggiunte di testo al termine del text buffer. 

Quando TEA è avviato inizialmente, esso pone tre domande: “INDI¬ 
RIZZO INIZIALE”, “INDIRIZZO FINALE” e “SORGENTE PRE¬ 
SENTE IN MEMORIA?”. Ciò è appunto illustrato nell’Esempio 1-1. 

Esemplo 1-1. Impiego del comando A (APPEND) per la creazione di un buffer 
Iniziale per II testo o per l'aggiunta di altro testo al text buffer. 


INITIAL ADDRESS ? 0050 000 
FINAL ADDRESS ? 0*70 000 
SOURCE CURRENTLY IN MEMORY 7 N 
OA 

0001 /THIS IS A TEST 
0002 

0003 *030 000 

0004 LOOP* J1P 
0005 LOOP 

0006 0 

0007 ? 

O 


INITIAL ADDRESS ? 

FINAL ADDRESS 7 

SOURCE CURRENTLY IN MEMORY 7 Y 
OA 

1)0 07 /COMMENT AT THE END 
0008 7 

OL 

0001 /THIS IS A TEST 
0002 

0003 *030 000 

0004 LOOP.» JMP 

0005 LOOP 

0006 0 

00 07 /COMMENT aT THE E*D 

0008 

C* 
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In questo esempio l’utente ha introdotto il numero ottale 050 000 
come un indirizzo iniziale per il text buffer, seguito da un indirizzo finale 
070 000 ottale. Si osservi come davanti ai due indirizzi si sia fatto uso 
della lettera 0. TEA stampa uno spazio dopo il primo numero ottale di 
tre cifre, risparmiando in tal modo all’utente il pensiero di provvedervi 
personalmente. A questo punto è posta la domanda “SOURCE CUR- 
RENTLY IN MEMORY?” (sorgente presente in memoria?). Poiché 
TEA è stato appena avviato, il buffer non può che essere vuoto, per cui si 
introduce una N per la risposta NO. Si batte allora il comando A 
(APPEND), al che, non essendovi testo nel buffer del testo, TEA 
risponde stampando 0001 come numero di linea. Si introduce allora il 
comando “/THIS IS A TEST” (questo è un test) seguito da un ritorno 
del carrello. Il ritorno del carrello fa sì che sia stampato il successivo 
numero di linea 0002 in vista dell’introduzione di un’altra linea di testo. 
Una volta introdotte tutte le sei linee di testo, TEA risponde con il 
numero di linea 0007, ma, poiché il testo è finito, l’utente risponde con 
un CTRL/C e TEA toma nel modo operativo di comando. 

A questo punto l’8080 è RESETTATO e l’utente ha arrestato l’esecu¬ 
zione di TEA. Lo scopo di tutto ciò è quello di permettere l’esecuzione di 
un’altro programma o di un’altra operazione. Allorché l’utente avrà 
ridato il via a TEA, questo risponderà con le tre domande già viste. In 
questo caso saranno utilizzati i medesimi indirizzi iniziali e finali in 
quanto l’utente avrà scelto di rispondere alle domande poste dal pro¬ 
gramma premendo il tasto RETURN. In ogni caso la risposta alla terza 
domanda è Y con il significato di YES, dal momento che vi è già stata 
l’introduzione di un programma. Questa volta, ricorrendo al comando 
A (APPEND) risulta stampato il numero di linea 0007 in quanto è questa 
la linea terminale del buffer del testo. Di nuovo, una volta introdotto il 
commento “COMMENT AT THE END” (commento al termine) e 


Esempio 1-2. Utilizzazione del dispositivo di lettura per porre In ingresso del 
testo nell’apposito buffer con II ricorso al comando A (APPEND). 


INITIAL ADDRESS 7 H23 0 0 

FINAL ADDRESS ? H3200 

SOURCE CURRENTLY IN MEMORY 7 ') 

OR 

OA 

7 


OL 
000 1 
0002 
0003 
0004 
0005 
0006 
0007 
0008 
OA 
000 » 
0009 


/THIS IS A TEST 

•030 000 
LOOP. JMP 
LOOP 
0 

/COMMENT AT THE E! D 


/THIS VAS ENTERED FROM THE KEYbOARD 
7 


OL7-8 

00 07 /COMMENT AT THE END 

0008 /THIS VAS ENTERED FROM THE KEYbOARD 


C = 
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premuto il tasto RETURN, TEA avrà risposto con il prossimo numero 
della linea seguente, cioè 0008. Mancando del testo aggiuntivo si intro¬ 
duce un CTRL/C per riportare TEA al modo di comando. Ritorno nel 
modo di comando TEA riceve in base al comando L (seguito da un 
RETURN) l’istruzione di procedere al listing di tutto il contenuto del 
text buffer. TEA procede così ad elencare tutte e otto le linee del testo. Si 
tralasci per ora di soffermarsi sul formato (struttura) del comando L 
(LIST: elenca). Il ricorso ad esso è puramente accidentale, dato che 
l’obiettivo principale dell’esempio è quello di illustrare l’effetto del 
comando A (APPEND). 

Come già detto in precedenza, l’impiego del comando R può essere 
abbinato a quello del comando A (APPEND) allo scopo di introdurre il 
testo nel buffer ad esso riservato valendosi di un lettore di nastro o di 
un’audio-cassetta. Al proposito si veda l’Esempio 1-2. 

Aggiunta (Appending) con II Comando R 

L’Esempio 1-2 prevedeva che TEA fosse avviato da “scratch” cosic¬ 
ché non vi era alcun buffer iniziale del testo. Una volta introdotti gli 
indirizzi iniziale e finale, questa volta in esadecimale (si noti l’impiego 
dell’H), l’utente risponde con N (NO) alla domanda “SOURCE CUR- 
RENTLY IN MEMORY?” (sorgente presente in memoria?). Il disposi¬ 
tivo di lettura, a questo punto è abilitato per introdurre il comando R, 
mentre avviene l’introduzione del comando A in modo che il testo letto 
dal lettore di banda o dall’audiocassetta sia aggiunto al buffer del testo 
già esistente, che inizialmente non contiene nulla. 

Una volta letta in memoria tutta la banda, TEA risponde con ?, C =. Si 
introduce a questo punto il comando L (LIST) in modo da poter ‘vedere’ 
ciò che è stato letto nel text buffer dal dispositivo “di lettura”. Si noti che 
ciò che il programma ha letto è esattamente lo stesso testo dell’esempio 
precedente. Si osservi, inoltre, che il dispositivo di lettura è disabilitalo 
avvenuta che sia la lettura dell'interno del nastro. La seconda volta che 
avviene l’introduzione del comando A (APPEND), il testo è introdotto 
(/THIS WAS ENTERED FROM THE KEYBOARD: ciò è stato intro¬ 
dotto dalla telescrivente) dalla tastiera della telescrivente, e non dal 
dispositivo di lettura. 

Una volta introdotta questa linea, avviene la stampa di un CTRL/C. 
TEA riceve quindi l’istruzione di procedere al listing delle sole linee 7 e 8 
del text buffer, come appunto ha eseguito. 

E importante osservare come, allorché avviene la lettura di un certo 
testo da un dispositivo di lettura, il testo stesso non sia stampato su di 
una stampante o sullo schermo di un CRT. La ragione di questo fatto è 
che in tal modo il testo può essere letto in memoria alla massima velocità 
possibile in quanto TEA non è rallentato dal dover stampare delle 
informazioni su di un dispositivo periferico poco veloce mano a mano 
che procede la lettura. 

Nell’Esempio 1-3 nel microcalcolatore sono introdotti gli indirizzi 
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Esemplo 1-3. Impiego del dispositivo di lettura per aggiungere altro testo al 

buffer. 


IN I TX AL ADDRESS 7 H2800 
FINAL ADDRESS 7 0065 120 
SOURCE CURRENTLY IN MEMORY 7 N 
O» 

000 1 /THESE FIRST FEV LINES VILL bE ENTERED FROM THE 
0002 /KEYBOARD. THEN THE R COMMAND» FOLLOVED BY THE 
0003 /A COMMAND» VILL BE USED TO INPUT TEXT FROM THE 
0004 /READER. VHICH VILL BE APPDIDED TO THE TEXT BUFFER. 

0005 ? 

OR 

OA 

7 

OL 

000 1 /THESE FIRST FEV LINES VILL BE ENTERED FROM THE 
0002 /KEYBOARD. THEN THE R COMMAND» FOLLOVED BY THE 
0003 /A COMMAND» VILL BE USED TO INPUT TEXT FROM THE 
0004 /REmDER» VHICH VILL BE APPEN DED TO THE TEXT BUFFER. 

0005 /THIS IS A TEST 
0006 

0007 *030 000 

0008 LOOP» JMP 
0009 LOOP 

0010 0 

00 11 /COMMENT AT THE END 
0012 
C- 

iniziale (esadecimale) e finale (ottale), dopodiché la tastiera della tele- 
scrivente serve per generare le prime quattro linee di testo ed il lettore di 
banda per aggiungere al buffer del testo addizionale consistente in sette 
linee. 


Insert (inserisci) 


8. La lettera I è quella impiegata per il comando INSERT (inserisci). 
La funzione di questo comando è quella di permette l’inserimento di una 
o più linee di testo a fronte di un ben determinato numero di linea. Il 
formato del comando I (INSERT) è riprodotto di seguito. 


C = Ini Inserisci il testo che segue a fronte del numero di linea 
“n” dopo che sia stato premuto il tasto RETURN (1). 

Se, dopo la I, si introducono un numero di linee valido ed un RETURN 
(1), TEA passerà nel modo di testo. Esso procederà alla stampa del 
numero di linea “n”, al che l’utente potrà introdurre una o più linee di 
testo. Nel caso che le linee di testo introdotte siano più d’una, sarà TEA 
stesso a generare e porre in uscita i numeri di linea che si rendono 
necessari. In qualunque momento l’utente può introdurre un CTRL/C, 
ottenendo da TEA la risposta ?, C=, che gli consente di introdurre un 
nuovo comando (nonché testo, se necessario). 

Analogamente a quanto avviene per il comando A (APPEND), se si 
introduce un CTRL/C prima che sia introdotta una linea di testo 
completa (prima cioè che sia stato premuto il tasto RETURN), questa 
linea non sarà introdotta nel buffer. L’Esempio 1-4 illustra il comando I 
(INSERT) ed il suo impiego. 
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Esemplo 1-4. Impiego del comando I (INSERT) per aggiungere una linea di 
testo Isolata o più linee al buffer. 


C-L 
0001 
0002 
<003 
0004 
0005 
0006 
C-I 1 
000 1 
0002 
C-L 
000 1 
0002 
0003 
0004 
0005 
0006 
0007 
012 
0002 
0003 
0004 
0005 
OL 
000 1 
0002 
0003 
M04 
0005 
0006 
0007 
0008 
0009 
0010 
0134 
7 

OI 

7 

013- 

7 

017 

0007 

OL 

<001 

0002 

0003 

0004 

0005 

<006 

<007 

0008 

0009 

0010 

o 


LOOP» 


•030 000 
JMP 
LOOP 
0 


/inserì this line in front of LINE NUMBER 000 1 
7 

/INSERT THIS LINE IN FRONT OF LINE NUMBER 000 1 

•030 000 
LOOP» JMP 
LOOP 
0 


/THE INSERT COMM/MD CMi AL SO BE USED TO INSERT MULTIPLE 
/LINES IN FRONT OF THE SPECIFIED LINE NUMBEH. VATCH HOV 
/ALL THE LINES OF TEXT AFTER THESE LINES ARE RE-NUMBEREDI 
7 

/INSERT THIS LINE IN FRONT OF LINE NUMBER 000 1 
/THE INSERT COMMAND CAN AL SO BE USED TO INSERT MULTIPLE 
/LINES IN FRONT OF THE SPECIFIED LINE NUMBER» VATCH HOV 
/ALL THE LINES OF TEXT AFTER THESE LINES ARE RE-NUMBEREDI 


LOOP» 


•030 000 
JMP 
LOOP 
0 


/THIS VILL NOT BE INSERTED BECAUSE OF A CTRL/C AT ITS BID7 

/INSERT THIS LINE IN FRONT OF LINE NUMBER 000 1 
/THE INSERT COMMAND CAN AL SO BE USED TO INSERT MULTIPLE 
/LINES IN FRONT OF THE SPECIFIED LINE NUMBER. VATCH HOV 
/ALL THE LINES OF TEXT AFTER THESE LINES ARE RE-N UM BERED I 


LOOP» 


•030 000 
JMP 
LOOP 
0 


Nell’esempio 1-4 si può osservare come l’impiego del comando L 
(LIST) permette di andare a vedere che cosa già contenga il text buffer. A 
fronte della linea 0001 si inserisce allora una linea di testo (/INSERT 
THIS LINE IN FRONT OF LINE NUMER 001: /inserisci questa linea 
a fronte della linea n° 001). Dopo che TEA ha stampato 0002, si intro¬ 
duce un CTRL/C con l’effetto che TEA abbandona il modo di testo per 
tornare a quello di comando e rispondere con un ?, C=. Per dare un 
esempio di come nel buffer si inseriscono più linee di testo insieme, si 
introduce il comando 12. 
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La risposta di TEA consiste nello stampare 0002 e passare quindi al 
modo di testo. In questo caso le linee di testo addizionali che si battono 
sono tre. Si osservi; come, allorché si introduce un RETURN, TEA 
provveda come prima cosa a stampare un ritorno del carrello e un 
avanzamento di linea e, subito dopo, stampi il numero relativo alla 
successiva linea di testo in sequenza. Dopo che sono state introdotte 
tutte e tre le linee di testo, TEA stampa infatti 0005. Poiché non vi sono 
altre linee di testo da inserire, si introduce un CTRL/C e TEA ritorna al 
modo di comando. 

Introducendo il comando L (LIST), si può osservare come TEA 
provveda a numerare di nuovo le linee di testo in base al numero di linee 
di testo inserite nel buffer del testo. Terminato il listing, sono stati 1 
introdotti alcuni comandi non validi. Il comando 134 è privo di signifi¬ 
cato in quanto non esiste un numero di linea 34 a fronte del quale si possa 
inserire del testo. Lo stesso vale per il comando I in questo caso non è 
specificato il numero di linea a fronte del quale si vuole inserire del testo. 
Anche il comando 13-5 è da considerarsi non valido dato che vi sono 
specificati due numeri di linea, mentre il formato del comando I 
(INSERT) esige che dopo la I e prima di premere il tasto RETURN, sia 
introdotto un solo numero di linea. Il comando finale 17 sarebbe in sé 
pienamente valido, ma nel microcalcolatore è stato introdotto un 
CTRL/C prima che potesse essere premuto il tasto RETURN, con il 
risultato che la linea 7 non ha potuto essere inserita nel text buffer. È 
possibile “vedere” che è stato introdotto un CTRL/C dal fatto che TEA 
ha stampato un ?, seguito da un ritorno del carrello, un avanzamento di 
linea C=. 

Si osservi come per inserire una linea di testo sia sufficiente porre in 
ingresso a TEA 12 quando esso stampa C=. Non è cioè necessario porre 
in ingresso 10002 o 1002 anche se, volendo, cioè è sempre possibile. Ciò 
che si vuol dire è che dai numeri di linea battuti in TEA si possono eliminare 
gli zeri iniziali. I numeri 0002 e 2 sono quindi equivalenti. TEA ignora gli 
zeri iniziali che sono eventualmente introdotti. Ad esempio in TEA 
potrebbe essere introdotto il comando 1000000021. Anche in questo caso 
TEA stampa il numero di linea 0002 e quindi si attende che siano inserite 
una o più linee di testo. 

Allorché TEA inserisce effettivamente nel buffer la linea di testo 
introdotta dall’utente, esso “spalanca” il buffer del testo per il numero di 
locazione di memorie volute e quindi scrive la linea di testo nel buffer. È 
questo il motivo per cui in un programma contenente 600 linee di testo, 
TEA impiega un pò di tempo per inserire una linea di testo in prossimità 
della “testa” del buffer. Per meglio comprendere, si esegua TEA nel suo 
operare. Dopo l’introduzione di un’intera linea di testo. TEA calcola il 
numero di caratteri effettivamente contenuti in quella linea. Esso sposta 
allora verso l’alto tutto il testo caricato in memoria dopo il punto di 
inserimento per tale numero di locazioni di memoria. Nel caso di un 
programma che contenga 600 linee di testo, può avvenire che 6.000 o 
10.000 caratteri debbano essere spostati verso l’alto di 10, 20 o 34 
locazioni di memoria a seconda della lunghezza del testo appena intro- 
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dotto. È chiaro che lo spostamento in memoria di tal numero di caratteri 
ASCII è un’operazione che richiede un tempo non trascurabile. 

Una volta che TEA ha proceduto al loro spostamento ed inserito la 
linea di testo, esso stampa il prossimo numero di linea in ordine sequen¬ 
ziale per la prossima linea di testo da inserire. 

L’impiego di questa tecnica di memorizzazione ad elenco sequenziale 
evita ogni spreco di memoria. Lo scotto da pagare per questa tecnica 
corrisponde al fatto che l’inserimento effettivo di una linea di testo può 
comportare un tempo non indifferente (da 0,1 a 0,6 secondi). E d’al¬ 
tronde ben vero che si sarebbe potuto ricorrere ad un’altra tecnica di 
memorizzazione cioè alla tecnica ad elenco concatenato, ma, con tale 
tecnica particolare, si verifica uno spreco di memoria non recuperabile a 
meno di disporre di un programma adeguatamente sofisticato. Gli 
inserimenti che si ottengono con il metodo ad elenco concatenato sono 
estremamente rapidi (non si riesce ad individuare nessun ritardo dovuto 
all’inserimento), ma hanno il difetto di utilizzare male la memoria. 
Poiché TEA sfrutta tutta la memoria a disposizione, esso esegue le 
istruzioni di “text collection” nel corso di un inserimento (I; INSERT), 
un cambiamento (C; CHANGE) ed una cancellazione (D; DELETE). 

Cambia 

9. La lettera C è quella impiegata per il comando CHANGE. La 
funzione di tale comando è quella di permettere di cambiare una certa 
linea di testo (una sola) e, nel caso che si introducano delle linee di testo 
addizionali, di favorirne l’inserimento nel buffer. Analogamente al 
comando I (INSERT) è necessario specificare un ben definito (unico) 
numero di linea. Il formato del comando C (CHANGE) è riportato di 
seguito. 

C=Cn l Cambia il numero di linea “n” ed inserisci un qualsiasi 
numero di linee di testo addizionali dopo la linea “n” una 
volta che il tasto RETURN (l) sia stato premuto. 

Avvenuta che sia l’introduzione della C, del numero di linea e di un 
RETURN, TEA passerà al modo di testo purché il numero di linea sia 
valido. Avverrà quindi la stampa del numero di linea specificato dal 
comando dopo di che l’utente può introdurre qualunque testo egli 
desideri. Tale nuovo testo sostituirà quello vecchio contenuto nel buffer 
allo specifico numero di linea. Dopo l’introduzione della prima linea di 
testo, ogni linea supplementare sarà memorizzata nel buffer diretta- 
mente di seguito alla prima (modificata). Naturalmente, se sono intro¬ 
dotte delle linee di testo addizionali, TEA provvederà a generare e 
stampare gli opportuni numeri di linea. Analogamente ai comandi A 
(APPEND) e I (INSERT), anche in questo caso l’utente può ritornare al 
modo di comando in qualsiasi momento, bastandogli introdurre un 
CTRL/C perchè TEA risponda con ?, C=, come preliminare all’introdu¬ 
zione di un nuovo comando. Nel caso che l’introduzione del CTRL/C 
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Esemplo 1-5. Impiego del comando C (CHANGE) per modificare il contenuto 

del buffer. 


C*L 
000 1 

0002 /THIS COMENT HIS MANNY MISTEAKS IN IT. 

0003 

0004 *042 341 

0005 LOOPIT. DCRC /DECREMENT THE COUNT 
0006 J.NZ /LOOP BACK IF THE COUNT 

0007 LOOPIT /IS NON-ZERO 

0006 0 

0009 RET /VHEN IT IS ZERO/ RETURN 

0010 
C-C2 

0002 /CORRECT THE PREUIOUS MISTEAKS. IF POSSIbLE 
0003 7 

OL 1-4 
000 1 

0002 /CORRECT THE PREVIOUS MI STEAK S» IF POSSIBLE 
0003 

0004 *042 341 

OC2 

0002 /CORRECT ALL PREVIOUS MISTAKES AND ADD A 
0003 /FEV ADDI TI ON AL LINES OF TEXT TO THE TEXT 
0004 /BUFFER. 

000S 7 

OL 1-8 
000 1 

0002 /CORRECT ALL PREVIOUS MISTAKES AND ADD A 
0003 /FEV ADDI TI ON AL LINES OF TEXT TO THE TEXT 
0004 /BUFFER. 

OOOS 

0Ò06 *042 341 

0007 LOOPIT» DCRC /DECREMENT THE COUNT 
0008 JNZ /LOOP BACK IF THE COUNT 


avvenga prima del RETURN relativo all’ultima linea di testo, questa 
non sarà introdotta nel buffer. 

L’Esempio 1-5 prevede un certo numero di comandi C (CHANGE). 
Dopo aver proceduto al listing del contenuto di tutto il buffer, si è deciso 
che la linea 0002 era tanto piena di errori da valer la pena di cambiarla. È 
stato perciò battuto il comando C21. TEA risponde con 0002 e a questo 
punto si introduce una nuova linea di testo. Allorché, dopo l’introdu¬ 
zione della E di POSSIBLE, si preme il tasto RETURN, TEA stampa un 
ritorno del carrello ed un avanzamento di linea, seguiti dal numero di 
linea della linea successiva. Poiché non vi è altro testo aggiuntivo da 
introdurre, si batte un CTRL/C per far sì che TEA ritorni al modo di 
comando. TEA ritorna al modo di comando e stampa un ?, ritorno del 
carrello, avanzamento di linea C=. L’impiego del comando L (LIST) 
permette di verificare che la linea 0002 è stata cambiata. 

Si è poi deciso non soltanto di cambiare la linea 0002, ma anche di 
aggiungere due linee di testo addizionali. Si introduce, perciò, nuova¬ 
mente il comando C21. Mentre TEA è nel modo di testo, non solo si 
cambia la linea 0002 ma si aggiungono altresì le linee 0003 e 0004. Come 
si poteva prevedere, la linea 0005 (LOOPIT, DCRC/DECREMENT 
THE COUNT) diviene la linea 0007, il che può essere confermato 
dall’esame del buffer. 

Come già si è avuto occasione di dire, l’introduzione di un CTRL/C 
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Esemplo 1-6. Introduzione In un CTRL/C mentre è In coreo l'esecuzione 
dell'Istruzione C (CHANGE). 

C*C7 

0007 LOOPIT, DCRb /MADE A MISTAKE CDCRB>< TYPE A CTRL/C7 
C*L 
000 1 

0002 /CORRECT ALL PREVIOUS MISTAKES A'ID ADD A 
0003 /FEW ADDI TIONAL LINES OF TEXT TO THE TEXT 
0004 /BUFFER. 

0005 

0006 *042 341 

0007 JNZ /LOOP BACK IF THE COINT 

0009 LOOPIT /IS NOM-ZERO 

0009 0 

0010 RET /UH IN IT IS ZERO. RETURJ 

0011 
C-C34 
7 

OC2-4 

7 

C-C 

7 

o 

prima di un RETURN fa sì che TEA ritorni al modo di comando senza 
aggiungere la linea di testo al buffer. In ogni caso è bene usare la dovuta 
cautela nell’introdurre un CTRL/C mentre è in corso l’esecuzione del 
comando C (CHANGE), come si può notare nell’Esempio 1-6. In tale 
esempio si è deciso di cambiare la linea 0007, per cui in TEA è stato 
introdotto come comando C71. TEA risponde con il correntto numero 
di linea a cui fa seguito l’introduzione della linea di testo. Prima tuttavia 
di premere il tasto RETURN, è stato deciso che la linea di testo conte¬ 
neva un errore, per cui si è ritornati al modo di comando. Dall’esame del 
listing del contenuto del buffer si scopre che la linea 0007 è stata 
cancellata. La ragione di questo fatto è la seguente. Se si introduce un 
comando C (CHANGE) con un numero di linea valido, la linea di testo 
così specificata risulta cancellata mentre TEA esegue le stesse istruzioni 
che sono eseguite allorché si ricorre al comando I (INSERT). La conse¬ 
guenza pratica è che il comando C (CHANGE) determina il medesimo 
risultato che si ottiene con l’esecuzione di un comando D (DELETE) 
seguito da un comando I (INSERT). L’utente perciò badi particolar¬ 
mente a valersi correttamente del CTRL/C allorché TEA sta seguendo il 
comando C (CHANGE). Questo tipo di problema, naturalmente, viene 
a mancare se il CTRL/C è introdotto dopo che il tasto RETURN è stato 
premuto. In tal caso prima avviene l’inserimento nel buffer dell’ultima 
linea di testo e solo allora TEA ritorna al modo di comando. L’Esempio 
1-7 rende evidente com? il comando C (CHANGE) sia equivalente ad un 
comando D (DELETE) seguito da un comando I (INSERT). Del 
comando D (DELETE) si tratterà fra non molto. 

Analogamente a quanto avviene con il comando I (INSERT), anche il 
comando C (CHANGE) fa sì che siano eseguite le istruzioni di TEA 
relative al text collection. La ragione evidente per cui questo avviene è 
che il comando C (CHANGE) ha come conseguenza che l’8080 esegua 
alcune istruzioni identiche a quelle che esso esegue allorché si introduce 
il comando I (INSERT). Ne risulta che, allorché si cambiano delle linee 
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Esempio 1-7. C (CHANGE) = D (DELETE) + I (INSERT) 


OL 




000 1 

*042 341 



0002 

LOOPIT/ DCRC 

/DECREMENT THE COUNT 

0003 

JNZ 

/LOOP BACK IF THE 

COUNT 

0004 

LOOPIT 

/IS NON-ZERO 


OOOS 

0 



0006 

0007 

RET 

/VHEN IT IS ZERO/ 

RETURN 

OD2 





OL 
000 1 
0002 
0003 
00 04 
000S 
0006 
012 
0002 
0003 
OL 
000 1 
00 02 
0003 
0004 
000S 
0006 
0007 
OC2 
00 02 
0003 
OL 
000 1 
0002 
0003 
0004 
0005 
0006 
0007 
O 

alPinizio del buffer, può occorrere un certo tempo perchè TEA esegua 
tutte le operazioni necessarie alla raccolta del testo e ritorni al punto in 
cui esso stampa il numero di linea per la prossima linea di testo in 
successione. 

Caratteristiche Comuni dei Comandi A (APPEND), I (INSERT), e 
C (CHANGE) 

Con TEA nel modo di testo, i comandi A (APPEND), I (INSERT)e C 
(CHANGE) presentano un certo numero di caratteristiche in comune. 
Già è noto che tutti e tre questi comandi possono essere utilizzati per 
aggiungere altro , testo al buffer e che un CTRL/C “pone fine” al 
comando (facendo ignorare l’ultima linea di testo nel caso che non sia 
stato introdotto un RETURN), provocando il ritorno di TEA al modo 
comune. Oltre a queste vi sono in comune anche delle caratteristiche 
relative alla correzione degli errori. 

Per la correzione di errori ndVattuale linea di testo, sintantoché non 
sia stato premuto il tasto RETURN , si può utilizzare il tasto RUBOUT 
(cancella). Se, ad esempio, nel buffer è stato battuto TELETYPEWR- 
TER, si potrebbe utilizzare il tasto RUBOUT per cancellare il TER alla 


*042 341 

JNZ /LOOP BACK IF THE COUNT 

LOOPIT /IS NON-ZERO 
0 

RET /VHEN IT IS ZERO/ RETURN 


LOOPIT/ DCRC /CHANGE THE COMMENT ON LINE 0002 
? 

*042 341 

LOOPIT/ DCRC /CHANGE THE COMMENT ON LINE 0002 
JNZ /LOOP BACK IF THE COUNT 

LOOPIT /IS NON-ZERO 
0 

RET /VHEN IT IS ZERO/ RETURN 


LOOPIT/ DCRC /CHANGE 0002 * DELETE 0002/ INSERT 0001 
? 


•042 341 

LOOPIT/ DCRC /CHANGE 0002 - DELETE 0002/ INSERT 000 1 
JNZ /LOOP BACK IF THE COUNT 

LOOPIT /IS NON-ZERO 
0 

RET /VHEN IT IS ZERO/ RETURN 
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fine della parola. L’errore sarebbe quindi corretto introducendo ITER. 
La prima volta che si preme il tasto RUBOUT, si ottiene la stampa di una 
seguita da una R. Una seconda pressione sul tasto RUBOUT 
avrebbe come conseguenza la stampa della E, il che significa che anche 
essa è cancellata dal buffer del testo. Una terza pressione sul tasto 
RUBOUT determinerebbe la soppressione della T. Ora che il TER è 
stato cancellato, si può introdurre ITER così che la parola TELETY- 
PEWRITER abbia la sua corretta ortografia. L’Esempio 1-8 illustra 
l’impiego del tasto RUBOUT per cancellare errori nell’attuale linea di 
testo. 

Esemplo 1-8. Impiego del tasto RUBOUT (DELETE) per la correzione di errori 
nell'attuale linea di testo. 


tuoi teletypevrternretiter 
0002 » 

OL 

000 1 TELETYPEWfUTER 
0002 


Si supponga che, dopo aver corretto l’ortografia di TELETYPEWRI- 
TER, si sia deciso che in realtà nella linea uno si voleva scrivere la parola 
CATHODE-RAY TUBE. Per far questo, si dovrebbe premere un certo 
numero di volte il tasto RUBOUT o quello DELETE sulla telescrivente 
o sul CRT. Per cancellare TELETYPEWRITER il tasto dovrebbe essere 
premuto 14 volte. Cosa accadrà, tuttavia, se il tasto RUBOUT 
(DELETE) è premuto invece 15 o 20 volte? Questo non provocherà la 
soppressione di alcun altro carattere in nessun altra linea di testo. Una 
volta che la linea di testo è stata completamente cancellata, TEA si 
limiterà ad ignorare qualunque altro RUBOUT (DELETE). Soltanto 
allorché nella linea di testo sono introdotti dei caratteri, il tasto 
RUBOUT (DELETE) può essere impiegato per cancellare alcuni .carat¬ 
teri (o anche la totalità dei caratteri) di quella linea. 

Può accadere, ad un certo punto, che in una data linea di testo, gli 
errori corretti siano tanto numerosi da rendere difficile la precisione 
esatta di ciò che è stato corretto e di ciò che non lo è stato. Premendo il 
tasto LINE-FEED (avanzamento di linea), TEA stamperà un ritorno del 
carrello ed un avanzamento di linea, seguito dal medesimo numero di 
linea di prima, unitamente a tutti i caratteri contenuti nella singola linea 
di testo. Questo facilita all’utente il compito di localizzare qualunque 
errore gli sia sfuggito in precedenza. Una volta che la linea di testo è stata 
stampata, è possibile compiere su di essa delle aggiunte o delle elimina¬ 
zioni. Una volta che l’utente è soddisfatto della composizione della linea 
di testo, questa è introdotta nel buffer premendo il tasto RETURN. 
L’Esempio 1-9 illustra le capacità di correzione degli errori di TEA. 

In questo esempio, come prima cosa si procede a cancellare total¬ 
mente il buffer e TEA si accerta che l’utente abbia davvero l’intenzione 
di eliminare il contenuto dell’intero buffer del testo ponendo la domanda 
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Esemplo 1-9. Impiego del latto RUBOUT (DELETE) per la correzione di errori 
e di quello LINE-FEED per osservare I cambiamenti effettuati nell'attuale linea 

di testo. 

C-D 

ARE YOU SURE 1 Y 
OA 

S001 TELETYPEVR1TEH\RETIRVEPYTH.ETCATH0DE-RAY tbue 
tosi CATHODE-RAY TBUESEUBUBE 
#00I CATHODE-RAY TUBE 
SO SS ? 

OL 

S00I CATHODE-RAY TUBE 

#002 

O 

“ARE YOU SURE?” (Sei sicuro?). Poiché la risposta è Y (per YES), ne 
risulta che Yintero buffer è cancellato. 

È quindi introdotto il comando A (APPEND) e, poiché il buffer è 
stato appena cancellato, TEA stampa il numero di linea 0001. 

È quindi battuta la parola TYPEWRITER, che però è subito dopo 
cancellata valendosi del tasto RUBOUT (DELETE). Dopo che la linea è 
stata interamente cancellata, sono introdotte le parole CATHODE- 
RAY TUBE. Si preme allora il tasto LINE-FEED in modo che l’utente 
possa osservare l’esatto contenuto della linea 0001. TEA risponde al 
LINE-FEED stampando una seconda volta il numero di linea (0001) e 
quindi i caratteri presenti in quella linea. Allorché TEA si ferma dopo 
aver stampato la E di TBUE, l’utente si accorge dell’ortografia errata di 
TBUE. Il tasto RUBOUT (DELETE), premuto tre volte, cancella i 
caratteri E, U e B. 

Si introducono allora, nell’ordine appropriato, i caratteri corretti. 
Proprio per assicurarsi che le parole siano scritte correttamente, si preme 
di nuovo il tasto LINE-FEED, al che TEA risponde nel modo corretto, 
stampando il numero di linea e le parole CATHODE-RAY TUBE scritte 
con ortografia corretta. Dato che l’esame è soddisfacente, l’utente intro¬ 
duce nel buffer la linea di testo premendo il tasto RETURN. TEA mette 
da parte nel buffer la linea e stampa quindi il prossimo numero di linea 
che segue, 0002. Si introduce allora un CTRL/C in modo che TEA 
ritorni nel modo di comando. Si introduce infine il comando L in modo 
che TEA provveda a stampare il contenuto del buffer, unitamente al 
numero di linea relativo alla linea di testo successiva se questa è stata 
introdotta. 

L’impiego di TEA può anche servire a cancellare interamente l’attuale 
linea di testo. Questo evita di dover premere 10 o 15 volte il tasto 
RUBOUT o quello DELETE. Per fare sparire l’intera linea di testo 
mentre ci si trova nel modo di testo, in conseguenza di uno dei comandi 
A (APPEND), I (INSERT) o C (CH ANGE), è sufficiente introdurre un 
CTRL/E prima che sia premuto il tasto RETURN. TEA provvederà a 
cancellare tutti i caratteri presenti nell’attuale linea di testo ed a stam¬ 
pare un ritorno del carrello ed un avanzamento di linea seguiti dallo 
stesso numero di linea. Potrà allora essere introdotta una nuova linea di 
testo. Analogamente ad un CTRL/C, un CTRL/E non determina la 
stampa di un carattere specifico. L’impiego del “tasto” CTRL/E è 
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Esemplo 1*10. Impiego del tasto CTRL/E per cancellare l’attuale linea di testo. 

Q, ^ 

OBOI /DELETE THIS WJTH "RUB0UTS"\ " STUOBUR" HTIU SIHT ETELED//LIN E 000 1 
00 0 2 /AND LINE 2. 

0003 f 
0*L 

000 1 /LINE 000 1 
0002 /AND LINE 2* 

0003 

C»D 

ARE YOU SURE ? Y 

OA 

006 1 /DELETION VITH A CTRL/E 1S EASI ER 
000 1 /LINE 000 1 
• 002 /AN D LINE 2. 

0003 » 

OL 

000 1 /LINE 000 1 
0002 /AND LINE 2. 

0003 

012 

0002 /THIS IS AN INSERTION TEST 
0002 /A CTRL/E WAS JUST ENTERED 
0003 ? 

OL 

000 1 /LINE 000 1 

0002 /A CTRL/E WAS JUST ENTERED 
0003 /AN D LINE 2. 

000A 

o 

illustrato nell’Esempio 1-10. 

Cosa succede nel caso che il buffer si avvicini all’indirizzo finale 
specificato dall’utente? Anche se dopo tale indirizzo finale vi può essere 
ancora della memoria disponibile, non è previsto che TEA si serva di 
questa memoria senza un’esplicita autorizzazione dell’utente. Inoltre 
occorre, naturalmente, considerare la possibilità al di là dell’indirizzo 
finale specificato dall’utente non vi sia altra memoria. Per evitare che 
l’utente cerchi di mettere da parte del testo in ( 1) memoria che non è stata 
riservata per essere utilizzata da TEA oppure (2) addirittura inesistente, 
TEA provvede a stampare un messaggio di errore tutte le volte che il 
buffer del testo giunge ad una distanza inferiore a 256 locazioni di 
memoria dall’indirizzo finale specificato dall’utente. Nel caso che questo 
si verifichi, TEA disabilita i comandi A (APPEND) e 1 (INSERT) in 
modo che in memoria non possa essere introdotto dell’altro testo. 11 
comando C (CHANGE) non risulta disabilitato. 

L’impiego del comando C (CHANGE) è ancora ammesso in quanto 
esso dapprima cancella una singola linea di testo e quindi attende che 
l’utente ponga in ingresso una o più linee di testo. Indipendentemente da 
quanto o da dove TEA giunge internamente alla zona delle 256 locazioni 
di memoria della fine del buffer, esso lascia che l’utente completi la linea 
di testo “in contravvenzione”, prima di dar luogo alla stampa del 
messaggio di errore. Ne consegue che l’utente può spingersi entro le 
ultime 250 o 230 locazioni di memoria alla fine del buffer, senza poter 
fare altro. Allorché l’ultima linea di testo è introdotta nel buffer 
mediante il tasto RETURN, TEA provvede a stampare il messaggio di 
errore “ME!” (MEMORY EXCEEDED: memoria superata) ritor¬ 
nando quindi al modo di comando. 
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Esemplo 1-11. Esaurimento della memoria. 


OM 

IN 1 TI AL ADDRESS ? 0050 000 
FINAL ADDRESS ? 0051 370 
SOURCE CURRENTLY IN MEMORY 7 Y 
C-L 

000 1 /THIS SUBROUTINE DECREMENTS THE CONTENT 
0002 /Or THE C REGI STER UNTIL IT IS ZERO. 

0003 

0004 *042 341 

0005 LOOPIT. DCRC /DECREMHNT THE COINT IN THE C REGI STER 

00 06 JNZ /JWiP BACH TO "LOOPIT" IF THE RESU.T 

0007 LOOPIT /IS NON-ZERO 

0008 0 

00 09 RET /C- 000. SO RETURN 

00 10 

C-A 

0010 /THIS SHOULD BE THE LAST LINE OF TEXT ALLSVED I I I I I I I I 

MEI 

OO 

OSI 035 
OSI 370 

LINE * - 00 11 

OA 

MEI 

013 

MEI 

C-CIO 

0010 /THIS COMMENT IS JUST AS LONG AS THE PREVIOUS ONE IMI 
MEI 

C- 


Ad eccezione di A (APPEND) e I (INSERT) possono essere utilizzati 
tutti gli altri comandi. L’Esempio 1-11 contiene un certo numero di 
messaggi di errore ME!. 

All’inizio dell’Esempio 1-11 si fissa l’indirizzo iniziale a 050000ottale 
e quello finale a 051 370 ottale, con il che l’utente ha riservato 505 
locazioni di memoria per il buffer del testo. Poiché in memoria è già 
contenuto un programma, l’utente lo comunica a TEA e chiede il listing 
del contenuto del buffer. Al completamento del listing si introduce il 
comando A (APPEND) in modo che al contenuto del buffer possa essere 
aggiunto del testo addizionale. Dopo aver introdotto una linea isolata di 
testo ed aver premuto il tasto RETURN, si introduce la linea di testo ed 
aver premuto il tasto RETURN, si introduce la line di testo nel buffer. 
Comunque, dal momento che la fine del buffer si trova ora a meno di 256 
locazioni di memoria dall’indirizzo finale, TEA stampa il messaggio di 
errore ME! e ritorna al modo di comando. Il comando Q non fa che 
dimostrare che il buffer si trova proprio entro 256 locazioni di memoria a 
partire dall'indirizzo finale. Nonostante si introduca il comando A 
(APPEND) TEA stampa il messaggio di errore ME! e ritorna immedia¬ 
tamente al modo di comando, impedendo l’introduzione di testo addi¬ 
zionale. Come previsto, l’utente non ha potuto inserire nemmeno una 
linea di testo nel buffer (131). 

Poiché il comando C (CHANGE) può essere ancora impiegato, si 
introduce un comando C101. TEA provvede a cancellare la linea 10 ed a 
stampare, quindi, il numero 0010. Si introduce a questo punto una 
nuova linea di testo, che, tuttavia, risulta tanto lunga da far sì che la fine 
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del buffer si trovi a meno di 256 locazioni di memoria dall’indirizzo 
finale, cosicché TEA stampa di nuovo il messaggio di errore ME!. 

In questa situazione, i possibili modi per continuare a servirsi dei 
comandi A (APPEND), e I (INSERT) sono tre. Introducendo il 
comando M (MEMORY), si ha la possibilità di incrementare l’indirizzo 
finale, riservando dell’altro spazio di memoria per il buffer. Se, natural¬ 
mente, la memoria R/W è stata già sfruttata completamente, questo 
sistema non potrà essere di aiuto. Un altro modo di risolvere tale 
problema consiste nel dare il via all’editing del programma, servendosi 
del comando C (CHANGE) per eliminare da esso i commenti particolar¬ 
mente lunghi. Generalmente, infatti, i commenti occupano in memoria 
uno spazio di gran lunga maggiore che non le espressioni mnemoniche e 
gli indirizzi in forma simbolica. L’ultimo metodo al quale si può ricor¬ 
rere, nel caso che la memoria a disposizione sia esaurita e che non sia 
possibili eliminare un buon numero di commenti, è quello di accanto¬ 
nare questa porzione del programma sorgente in qualche dispositivo 
periferico, quale potrebbe essere un’audio-cassetta, una banda perforata 
ovvero un floppy disk. 


Cancellare 

10. La lettera D è quella impiegata per il comando DELETE (cancel¬ 
lare). La funzione di questo comando è quella di permettere di cancellare 
una linea di testo, un gruppo di linee oppure l’intero buffer. Il formato 
del comando D è riportato di seguito. La freccia diretta verso il basso ( 1) 
è il simbolo per il tasto RETURN premuto. 


C=Dnl Cancella la linea con numero “n” 

C=Dn-mlCancella la linea da “n” a “m” 

C=DI Cancella l’intero buffer 

Indipendentemente da! comando DELETE che si è impiegato, TEA prov¬ 
vede in ogni caso ad apportare gli opportuni cambiamenti dei numeri di 
linea. Nel caso del primo comando, la linea cancellata è una, cioè la linea 
(n), cosicché il numero di linea n»l sarà tramutato in n, mentre tutti gli 
altri numeri di linea maggiori di n subiranno un decremento di uno. 
Allorché è cancellato un gruppo di linee di testo, TEA provvederà in 
modo analogo agli opportuni cambiamenti dei numeri di linea. 

Se si introduce il comando C=Dl, TEA non procederà a cancellare 
l’intero buffer sino a che l’utente non abbia risposto alla domanda “ARE 
YOU SURE?”. Tale precauzione evita che l’intero buffer sia cancellato 
per sbaglio. Rispondendo Y (YES) alla domanda, TEA provvede a 
stampare un ritorno del carrello seguito da un C= e cancella intanto il 
buffer. Nel caso che la risposta dell’utente sia N (NO), TEA stampa un 
punto di domanda, seguito da un ritorno del carrello/avanzamento di 
linea e C=. 
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Esemplo 1-12. Impiego del comando D (DELETE) per cancellare una linea 
soltanto, un gruppo di linee e l’Intero buffer. 

INITIAL ADDRESS ? 0050 000 
FINAL ADDRESS 7 0 07 0 000 
SOURCE CURRENTLY IN MEMORY ? N 
OR 
OA 
? 

OL 

0001 /THIS IS A TEST 
0002 

0003 *030 000 

0004 LOOP/ JMP 

0005 LOOP 

0006 0 

0007 /COMMENT AT THE END 
0008 
ODI 
OL 
000 1 

0002 *030 000 

0003 LOOP/ JMP 

0004 LOOP 

0005 * 0 

0006 /COMMENT AT THE END 
0007 
OD3- 5 
OL 
000 1 

0002 *030 000 

0003 /COMMENT AT THE END 
0004 
OD 

ARE YOU SURE ? N? 

OL 
000 1 

0002 *030 000 

0003 /COMMENT AT THE END 
0004 
OD 

ARE YOU SURE ? Y 
OL 
000 1 
O 

L’Esempio 1-12 illustra il modo di impiego del comando D 
(DELETE). Dopo aver fissato gli indirizzi iniziale e finale del buffer ed 
aver comunicato a TEA che al momento non vi è sorgente in memoria, ci 
si serve del dispositivo di lettura per porre in ingresso del testo nel buffer. 
Si esegue il comando L (LIST) per esaminare il contenuto del buffer. 
Una volta completato il listing, si introduce il comando D11. Si cancella 
allora la prima linea contenente il comando “THIS IS A TEST”. Effet¬ 
tuando il listing del contenuto del buffer. Si può notare come questa 
linea sia stata cancellata mentre tutte le linee successive hanno cambiato 
la loro numerazione. La linea numero 0003, che conteneva * 030000, ha 
avuto, dopo la “cancellatura”, il nuovo numero 0002 e così tutte le altre. 

Si introduce allora il comando D3-51, con il risultato di cancellare le 
linee da 0003 a 0005. Dal listing del contenuto del buffer non è difficile 
verificare come questa soppressione sia stata eseguita correttamente. 
Poiché queste linee sono state cancellate, la linea contenente “/COM¬ 
MENT AT THE END” riceve un nuovo numero, e precisamente il 
numero di linea 0003. Si osservi come i numeri relativi alla prima a 
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seconda linea rimangono inalterati. 

Si introduce a questo punto il comando per cancellare l’intero buffer 
del testo (DI), ma, poiché l’utente ha risposto N (NO) alla domanda 
posta da TEA, il buffer non è cancellato. Questo può essere verificato 
mediante il comando L (LIST) che segue il tentativo di eliminazione. 
L’utente ha cercato allora una seconda volta di cancellare l’intero buffer, 
rispondendo questa volta alla domanda “ARE YOU SURE?” con Y 
(YES). L’intero buffer è quindi stato cancellato come appare dal risul¬ 
tato ottenuto allorché si è proceduto al Iisting dell’“intero” buffer. Si 
osservi come TEA stampi il numero per comunicare che, nel caso si 
introduca una linea di testo utilizzando un altro comando (si potrebbe 
utilizzare il comando A; APPEND), essa sarebbe automaticamente 
numerata da TEA come linea numero 0001. 

Cosa accade nel caso che si cerchi di cancellare delle linee di testo che 
non esistono? Dall’Esempio 1-13 appare come TEA non possa cancel¬ 
lare linee di testo inesistenti, cosa che, del resto, era prevedibile. Secondo 
l’esempio 1-13, nel buffer vi sono le linee da 0001 a 0007, per cui, quando 
si prova a cancellare delle linee che non esistono, TEA risponde con un 
punto di domanda, seguito da un C=. Nessuna linea risulta cancellata e 
TEA si mantiene in attesa del prossimo comando. Si noti anche come 
TEA possa cancellare la linea 0008. Il buffer conteneva infatti solo le 
linee da 0001 a 0007 ed il numero 0008 si trova stampato nel Iisting 
unicamente per denotare il numero della prossima.linea. Si osservi come 
sia stato fatto anche il tentativo di cancellare le linee da 5 a 12. Nono¬ 
stante 1’esistenza delle linee 5, 6, 7, le linee 8, 9, 10, Ile 12 non esistono, 
cosicché nessuna linea risulta cancellata. Ciò è “dimostrato” dal Iisting 
in fondo all’esempio. 

Esemplo 1-13. Tentativo di cancellare linee di testo Inesistenti. 


OL 


000 1 

/TH1S IS A TEST 

0002 


0003 

•030 000 

0004 

LOOP* JMP 

0005 

LOOP 

0006 

0 

0007 

/COMM EN T AT THE 

0008 


O D34 


? 


ODI 2 


? 


C-D12 

-34 

7 


C-DS- 

12 

? 


OD8 


? 


OL 


000 1 

/TH1S IS A TEST 

0002 


0003 

*030 000 

0004 

LOOP* JMP 

0005 

LOOP 

0006 

0 

0007 

/COMMENT AT THE 1 

0008 


O 
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Analogamente ai comandi I (INSERT), e C (CH ANGE), il comando 
D (DELETE) esegue anch’esso istruzioni di raccolta del testo. A diffe¬ 
renza degli altri due comandi, tuttavia, il comando D (DELETE) riduce 
le dimensioni del buffer in quanto alcune linee di testo risultano cancel¬ 
late, mentre i comandi I (INSERT) e C (CHANGE) danno luogo ad 
un’espansione del buffer. Può dunque capitare che, nel caso che sia 
cancellato un gran numero di linee nell’ambito di un programma esteso, 
TEA abbia bisogno di un certo tempo (inferiore comunque al secondo). 
Se, in un programma di 1000 linee, si cancellano le linee da 100 a 200, le 
linee da 201 a 1000 debbono essere spostate in memoria verso il basso. 
Una volta effettuato tale spostamento TEA risponderà con C=, in 
previsione che sia introdotto un altro comando. 

Mentre la conoscenza del meccanismo con cui avviene la raccolta del 
testo non è affatto essenziale, è però importante rendersi conto che tale 
operazione si svolge effettivamente e che, allorché questo avviene, TEA 
necessiterà di un pur breve lasso di tempo per effettuarla. Tal tempo di 
attesa può essere notato soltanto se il buffer è particolarmente esteso, 
costituito da 10.000 o 15.000 caratteri. 

Si ricorda che la ragione alla base dell’aver voluto incorporare in TEA 
la raccolta del testo era quella di poter mettere a disposizione del buffer il 
maggior spazio di memoria possibile (nei limiti determinati dagli indi¬ 
rizzi iniziale e finale stabiliti dall’utente). 


COMANDI PER ACCEDERE AL BUFFER 

Ad eccezione di uno, i comandi per accedere al buffer non influiscono 
sul contenuto di quest’ultimo. Tali comandi permettono all’utente 
l’esame dei contenuti del buffer, la ricerca di stringhe di caratteri, la 
conservazione in dispositivi periferici dei contenuti del buffer e l’acquisi¬ 
zione di informazioni riguardo al volume di memoria attualmente 
impegnata dal buffer ed all’estensione della memoria ad esso riservata. 
Uno di questi comandi, il comando L (LIST), già utilizzato, è comunque 
più sofisticato di quanto si possa presumere dagli esempi precedenti. 


List (elenca) 

11. La lettera L è quella impiegata per il comando LIST. Tale 
comando può essere utilizzato per ‘listare’ una linea soltanto un gruppo 
di linee o l’intero buffer su di un CRT o una telescrivente. Una volta 
effettuato il listing della (e) linea (e) di testo, TEA ritorna automatica- 
mente al modo di comando. Se, a un dato momento, si vuole arrestare il 
procedimento di listing e ritornare al modo di comando, è sufficente 
introdurre un CTRL/C. Il formato per il comando L (LIST) è riprodotto 
di seguito. 
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C=Lnl Fai il listing della linea numero “n” 

C=Ln-ml Fai il listing delle linee da “n” a “m” 

C=LI Fai il listing del contenuto dell’intero buffer 

Come si è già potuto osservare nelle occasioni in cui ci si è serviti del 
comando L (LIST), la linea (o le linee) di testo sono stampate unitamente 
ai numeri di linea generati da TEA. Questo avviene puntualmente 
indipendentemente dal comando L utilizzato. 

L’Esempio 1-14 illustra per l’appunto l’impiego del comando L 
(LIST). 

In tale esempio, essendo stato introdotto il comando LI, si ottiene il 
listing dell’intero buffer. Le linee 0001 e 0005 sono ‘listate’ individual¬ 
mente poiché sono stati introdotti i comandi Lll ed L51. 


Esemplo 1-14. Impiego del comando L (LIST). 


OL 





000 1 

*042 

341 



0002 LOOPIT# 

DCRC 


/ DECRETI DJ T THE COLNT 

0003 

JMZ 


/LOOP BACK IF THE 

COINT 

0004 

LOOPIT 

/IS MOM-ZERO 


0005 

0 




0006 

0007 

RET 


/VHEN IT IS ZERO# 

RETURN 

OL 1 

000 1 

*042 

341 



OL 5 

0005 

0 




OL2-3 





0002 LOOPIT# 

DCRC 


/DECREMENT THE COINT 

0003 

JNZ 


/LOOP BACK IF THE 

COINT 

OL4-20 





0004 

LOOPIT 

/IS MON-ZERO 


0005 

0 




0006 

0007 

OLI 5 
? 

OL 15-20 
? 

OL 10234 
? 

O 

RET 


/VHE* IT IS ZERO# 

RETUkJ 


È stato poi introdotto il comando L4-201 (che sembrerebbe un 
comando non valido per la semplice ragione che non vi sono linee con 
numeri maggiori di 6). Poiché, tuttavia, è talvolta difficile ricordarsi il 
numero dell’ultima linea del buffer, nel caso che nel comando di listing il 
secondo numero di linea non sia valido , TEA provvederà comunque al 
listing del buffer, a partire dal primo numero di linea specificato e 
continuando sino a che non sia raggiunta la fine del buffer del testo. TEA 
ritornerà quindi al modo di comando. 
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Punch (perfora) 

12. La lettera P è quella impiegata per il comando PUNCH. La 
funzione-di questo comando consiste nel permettere di conservare Fin¬ 
terò buffer o delle sue porzioni in un dispositivo periferico. Tra i disposi¬ 
tivi di uso più frequente sono compresi un perforatore di banda e un 
registratore di audio-cassette. L’impiego delle audio-cassette è effettiva¬ 
mente possibile, nonostante il nome del comando “implichi” l’impiego 
di un perforatore vero e proprio. Una volta perforata la linea (le linee) di 
testo, TEA ritorna nel modo di comando. Il formato dei tre differenti 
comandi punch è quello che segue. 

C=Pnl Metti da parte la linea “n” del dispositivo periferico 

C=Pn-mi Metti da parte le linee da “n” a “m” nel dispositivo 
periferico 

C=P1 Metti da parte il contenuto dell’intero buffer nel disposi¬ 
tivo periferico. 

Prima che qualsiasi parte di testo sia passata al dispositivo periferico, 
TEA pone in uscita 128 caratteri (200 in ottale 80 in esadecimale) che 
formano il leader (la testa) del programma. È quindi posta in uscita la 

Esemplo 1-15. Impiego del comando P (PUNCH) per accantonare del testo su 
di un dispositivo periferico. 


C-L 
000 1 

0002 LOOPIT, 

0003 

0004 

0005 

0006 

0007 

OP1 

•042 341 


•042 341 

DCRC /DECREMENT THE COUMT 

JNZ /LOOP BACK IF THE COUNT 

L00P1T /IS NON-ZERO 

0 

RET /VHEN IT IS ZERO, RETURN 


OP3-5 

JNZ/LOOP BACK IF THE COINT 
LOOPIT/IS NON-ZERO 
0 


OP 

•042 341 

LOOPIT, DCRC/DECREMENT THE COINT 
JNZ/LOOP BACK IF THE COINT 
LOOPIT/IS NON-ZERO 
0 

RET/VHEN IT IS ZERO, RETURN 
C*P4- 15 

LOOPIT/IS NON-ZERO 
0 

RET/VHEN IT IS ZERO, RETURN 

OP34 

7 

OP 1 0- 30 
? 

O 
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parte di testo specificata, seguita da un CTRL/C (203 in ottale, 83 in 
esadecimale). Dopo il CTRL/C sono posti in uscita 128 (200 in ottale 80 
in esadecimale) caratteri di chiusura (trailer). Allorché i caratteri di 
chiusura sono stati posti in uscita, TEA ritorna nel modo di comando. 
La ragione per cui, alla fine del testo, mette da parte il CTRL/C è di far sì 
che, allorché il testo è riletto di nuovo in TEA con l’impiego dei comandi 
R (READER) e A (APPEND), I (INSERT)eC (CHANGE), TEA possa 
accorgersi di aver letto tutto il testo. Utilizzando come dispositivo 
periferico una telescrivente equipaggiata con un perforatore di banda si 
otterrebbe un risultato analogo a quello presentato dall’Esempio 1-15. 

Come si può osservare nell’Esempio 1-15, TEA provvede a compri¬ 
mere il testo mano a mano che questo è posto in uscita verso il dispositivo 
periferico. Mentre non è tanto importante conoscere il meccanismo per 
giungere a questo risultato, è invece fondamentale il fatto che lo scopo è 
quello di inviare in uscita al dispositivo periferico il minor numero 
possibile di caratteri. Come si può notare, il comando P (PUNCH) mette 
in grado di accantonare una linea, un gruppo di linee ovvero il contenuto 
dell’intero buffer in un dispositivo periferico. 

Analogamente a quanto avviene con il comando L (LIST), se nel 
comando P (PUNCH) che si introduce, il secondo numero di linea non è 
valido, TEA provvederà lo stesso a perforare il contenuto del buffer, a 
partire dalla prima linea specificata e continuando sino a che non sia 
stata raggiunta la fine del buffer. TEA ritornerà quindi al modo di 
comando, in attesa che sia introdotto un altro comando. 


Ouery 

13. La lettera Q è quella impiegata per il comando QUERY. La 
funzione di tale comando è quella di permettere di determinare l’indi¬ 
rizzo dell’ultima locazione di memoria utilizzata dal buffer, l’indirizzo 
dell’ultima locazione di memoria riservata al buffer ed il numero di linee 
attualmente contenute nel buffer. Il formato del comando Q (QUERY) è 
riportato di seguito. 


C=Q Dopo aver premuto il tasto Q, non vi è bisogno di pre¬ 
mere il tasto RETURN (l) 


L’Esempio 1-16 presenta alcuni risultati ottenuti con l’impiego del 
comando Q. 

Dopo aver avviato TEA, sono stampate le richieste per un indirizzo 
iniziale e finale. Dopo ciascuna domanda è premuto il tasto RETURN, 
in quanto l’utente intende continuare a valersi dei limiti di indirizzo 
stabiliti in precedenza. Dopo una risposta Y alla domanda “SOURCE 
CURRENTLY IN MEMORY?” (sorgente presente in memoria?), si 
passa al listing del programma contenuto nel buffer. Si introduce allora 
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Esemplo 1-16. Impiego del comando Q (QUERY) per determinare l’utlllzza- 
zlone della memoria ed I suoi limiti. 

IN ITI AL ADDRESS T 
FINAL ADDRESS T 

SOURCE CURRENTLY IN MEMORY T Y 
C-L 

000 1 * 0A2 3A1 

0002 LOOPIT. DCRC /DECREMENT THE COUNT 
0003 JNZ /LOOP bACK IF THE COUNT 

00 0A LOOPIT /IS NON-ZERO 

000S 0 

0006 RET /VHEN IT IS ZERO. RETURO 

0007 

OO 

OSO 200 
07 0 000 


LINE # - 0007 

OH 

OQ 

23 8 0 

33 00 

LINE # - 0007 

OM 


IN I TI AL ADDRESS 7 H2800 
FINAL ADDRESS 7 H3800 
SOURCE CURRENTLY IN MEMORY 7 Y 
OQ 


28 8 0 
38 00 

LINE i » 0007 

OO 

OQ 

050 200 
07 0 000 

LINE • > 0007 

O 


il comando Q (QUERY) e TEA stampa l’indirizzo 050 200, indirizzo 
dell’ultima locazione di memoria utilizzata dal buffer, (non lo si con¬ 
fonda con l’indirizzo della locazione di memoria dove è memorizzata la 
N di RETURN). Avviene quindi la stampa dell’indirizzo dell’ultima 
locazione di memoria riservata al buffer (070 000 ottale), coincidente con 
l’indirizzo finale specificato in precedenza. L’ultima linea che TEA 
stampa in seguito a questo comando è “LINE # = 0007”. Come si può 
notare questo non è propriamente il numero delle linee di testo conte¬ 
nute nel buffer bensì è il numero della prossima linea di testo da intro¬ 
durre, se mai ne esiste una. 

Valendosi del comando H (HEXADECIMAL), dopo che TEA ha 
stampato il “numero di linee”, si fa passare TEA al funzionamento con 
numeri esadecimali. Ciò è evidente la seconda volta che si introduce il 
comando Q poiché ora gli indirizzi 050 200 e 070 000, sono stampati 
sotto forma dei loro numeri equivalenti esadecimali; 2880 e 3800. Dopo 
la stampa di questi due numeri, è stampato anche il numero della 
prossima linea di testo, nell’ipotesi che ve ne sia una. Si introduce a 
questo punto il comando M (MEMORY), introducendo in forma di 
numeri esadecimali i medesimi limiti di memoria. Poiché TEA si trova 
ancora nel modo esadecimale, il comando Q introdotto subito dopo dà 
luogo alla stampa degli stessi numeri esadecimali di prima. Il comando O 
(OCTAL) riporta indietro al modo operativo ottale, come si può notare 
dai risultati stampati in seguito all’ultimo comando Q (QUERY). 
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Search (ricercare) 

14. La lettera S è quella impiegata per il comando SEARCH. La 
funzione di questo comando è quella di rintracciare nel buffer 1’esistenza 
di una stringa. Il formato per il comando S (SEARCH) è riportato qui di 
seguito. 

C=S=STRING (CTRL/S) 

Allorché tale comando è introdotto, TEA risponde stampando un 
segno di uguale (=) dopo la S battuta dall’utente. È possibile, a questo 
punto, introdurre una stringa di lunghezza sino a 10 caratteri. Tale 
stringa non deve contenere ne ritorni del carrello, ne avanzamenti di 
linea e nemmeno “tab” (tabulazioni) (delle quali si daranno dei cenni). 
Una volta introdotta la stringa dei caratteri, occorre introdurre un 
CTRL/S. Allorché TEA riceve in ingresso il carattere CTRL/S, comin¬ 
cia la ricerca a partire dall’inizio del buffer. Esso si fermerà nella sua 
ricerca soltanto (1) quando avrà trovato una stringa di caratteri uguale 
oppure (2) quando sarà giunto alla fine del buffer. Se TEA trova una 
stringa “gemella”, provvede a stampare il numero di linea della ricerca 
contenente la stringa, unitamente alla linea di testo completa. TEA 
ritornerà, quindi, al modo di comando. Nel caso che TEA non si imbatta 
in una stringa corrispondente, provvederà a stampare un ?, tornando poi 
al modo di comando. 

Se si comincia a battere una stringa e ci si accorge di aver commesso un 
errpre nella stringa stessa, si rimedierà introducendo un CTRL/C. TEA 
ritornerà così al modo di comando per cui si potrà introdurre di nuovo il 
comando S (SEARCH) e quindi la stringa voluta. Il comando S 
(SEARCH) non può essere utilizzato per localizzare una stringa conte¬ 
nuta in parte in una linea e parte in un’altra. Il comando S (SEARCH), 
cioè non può valicare le linee. 

L’Esempio 1-17 contiene una dimostrazione pratica del comando S 

Esemplo 1-17. Ricerca di atrlnghe corrispondenti nel buffer. 

OL 


000 1 

# 042 341 

0002 LOOPIT, 

DCRC 

/DECREMENT THE COUNT 

0003 


/LOOP BACK IF THE COUNT 

00 04 

LOOPIT 

/IS NON-ZERO 

0005 

0 

0006 

0007 

RET 

/WHEN IT IS Z ERO, RETURN 

C-S-LOOPIT 

1)002 LOOPIT, 

DCRC 

/DECREMENT THE COUNT 

C=S*-ZERO 

0004 

LOOPIT 

/IS NON-ZERO 

OS-RET 

0006 

RET 

/VHEN IT IS ZERO* RETURN 


C= S= STRINO T00 LONG!? 
OS>TESTl? 

OS-TTYOUT? 

C=S= BASIC? 

O 
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(SEARCH) e del modo di impiegarlo. La prima stringa che si vuole 
rintracciare è “LOOPIT”. Si noti che, quando si introduce CTRL/S, 
nulla è stampato sulla stampante. TEA trova questa stringa nella linea 
0002, cosicché stampa il numero di linea e quindi la linea di testo. Si 
introduce poi la stringa “ZERO”, che TEA trova nella linea 0004. Si 
osservi come nella stringa che TEA cerca di rintracciare possa essere 
contenuta una lineetta, come pure qualunque altro carattere di stampa, e 
non solamente lettere e numeri. La terza stringa che TEA è chiamata a 
rintracciare è “RET”, trovata nella linea 0006. È stata quindi introdotta 
una stringa contenente 16 caratteri (STRING TOO LONG!). Invece di 
esplorare il buffer del testo alla ricerca di una stringa corrispondente, 
TEA si è limitata a stampare un ?, seguito da un C=. Sono poi state 
introdotte tre altre stringhe, ma, non avendo potuto trovare nel buffer 
una stringa corrisponde, TEA ha stampato ?, seguita da C=, dopo 
ciascuna di esse. 

Next (successivo) 

15. La lettera N è quella impiegata perii comando NEXT. La funzione 
di questo comando è quella di far si che si possa rintracciare la seconda, 
la terza, e così via, comparsa della stringa nel buffer. Se TEA fosse 
dotato del solo comando S (SEARCH), sarebbe infatti impossibile 
scoprire tali comparse addizionali della stringa. Il formato per il 
comando N (NEXT) è riportato qui di seguito. 

C = N Dopo aver premuto il tasto N non è necessario premere il 
tasto RETURN (l). 

Allorché TEA stampa C=, è sufficiente premere il tasto N per dar 
luogo alla sequenza NEXT di istruzioni contenuta in TEA. 

TEA continuerà allora a cercare, cominciando dalla linea che viene 
dopo quella contenente la precedente stringa corrispondente. Nel caso 
che si trovi un’altra corrispondenza, TEA provvede a stampare il 
numero di linea e la linea di testo. Se non si trovano ulteriori corrispon¬ 
denze, TEA si limita a rispondere con ?, C=. L’impiego del comando N 
(NEXT) può essere studiato nell’Esempio 1-18. 

Esemplo 1-18. Impiego del comando N (NEXT) per trovare nel buffer presenze 
ulteriori della stessa stringa. 

C-S-LOOPIT 

0002 LOOPIT» DCRC /DECREMENT THE COINT 
C-N 

0004 LOOPIT /1S NON-ZERO 

ON? 

O-S-ZERO 

0004 LOOPIT /IS NON-ZERO 

C-N 

0006 RET /VHEN IT IS ZERO» RETUfN 

C-N? 
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Secondo questo esempio, si introduce in TEA la stringa di ricerca 
LOOPIT. TEA risponde stampando il numero di linea (0002) e la linea di 
testo che contiene la stringa corrispondente. Si introduce a questo punto 
il comando N e TEA trova un’altra stringa corrispondente nella linea 
quattro, che provvede a stampare in uscita. Introducendo ancora il 
comando N (NEXT), TEA stampa un ? e C=, poiché non riesce a trovare 
nessuna ulteriore stringa corrispondente. Si introduce poi la stringa 
ZERO e TEA trova una stringa corrispondente nella linea quattro. Si 
introduce di nuovo il comando N e TEA trova una seconda stringa 
corrispondente nella linea cinque. Quando si introduce ancora il 
comando N (NEXT), TEA non può trovare nessun’altra stringa corri¬ 
spondente. 

Il comando N (NEXT) non può servire a trovare la seconda, o comunque 
ulteriore presenza di una stringa nella medesima linea di testo. Ciò è 
evidenziato nell’Esempio 1-19. Il programma originale è stato modifi¬ 
cato con il semplice ricorso al comando C (CH ANGE). La linea due ha 
subito variazioni in modo da contenere due volte la stessa stringa 
(DCRC). Si introduce allora il comando S (SEARCH), introducendo 
dopo il segno di uguaglianza la stringa di ricerca DCRC. TEA trova 
nella linea due la prima comparsa di DCRC. Il comando N, a questo 
punto, impartisce a TEA l’ordine di continuare a cercare, a partire dalla 
linea tre, cosicché la seconda comparsa di DCRC nella linea due non è 
stata rilevata. 


Esemplo 1-19. Impiego del comando N (NEXT) per tentare di trovare la prima 
rlcomparaa della stetea stringa nella stessa linea di testo. 


OL 
000 1 


•042 341 



0002 

LOOPIT, 

DCRC 

/DCRC THE COINT 


0003 

0004 

0005 


JMZ 

LOOPIT 

0 

/LOOP BACK IF THE 
/IS N ON - Z ERO 

COIN T 

0006 

0007 

OS» 

DCRC 

RET 

/WHIN IT IS ZERO, 

RETURN 

0002 

OM7 

LOOPIT, 

DCRC 

/DCRC THE COUNT 



Exchange (Scambiare) 

16. La lettera E è quella impiegata per il comando EXCHANGE. 

La funzione di tale comando è quella di far sì che la nuova stringa 
prenda il posto di una vecchia stringa reperita nel buffer mediante i 
comandi S (SEARCH) o N (NEXT). I metodi in cui il comando E 
(EXCHANGE) può essere utilizzato sono due e i relativi formati sono 
riportati qui di seguito. 

C=E=NEW STRING (CTRL/E) ... (RETURN non necessario) 
C=ES.(RETURN non necessario) 
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Allorché, mediante i comandi S (SEARCH) o N (NEXT) si trova una 
certa stringa, si può utilizzare il comando E (EXCHANGE) per sosti¬ 
tuire tale stringa con una stringa nuova. Dopo che la stringa è stata 
trovata, e TEA è ritornato al modo di comando, si introduce il comando 
E (EXCHANGE) seguito da un segno di uguale. A differenza del 
comando S (SEARCH), dopo l’introduzione del comando E 
(EXCHANGE) TEA non provvede da sé a stampare il segno di uguale. 
Una volta introdotto il segno di uguale, l’utente può introdurre una 
stringa di lunghezza a piacere. Tale nuova stringa sostituisce la presenza 
di quella vecchia allorché l’utente introduce un CTRL/E in coda alla 
nuova stringa. Una volta avvenuto lo scambio delle stringhe, TEA 
ritorna al modo di comando in attesa che sia introdotto un nuovo 
comando. 

Nel caso che in un programma si debba sostituire un certo numero di 
stringhe del tipo di LOOPIT oppure TEMPO, è possibile procedere allo 
scambio delle linee di testo valendosi del comando C (CHANGE) 
oppure rintracciando le varie stringhe (comandi S o N) e quindi permu¬ 
tando la “vecchia stringa” con una nuova specificata dal comando E 
(EXCHANGE). Tuttavia questo sistema potrebbe risultare alquanto 
laborioso se la nuova stringa da battere per il comando E 
(EXCHANGE) dovesse essere ripetuta, poniamo, 10 o 15 volte. In 
alternativa, potrebbe risultare conveniente introdurre la nuova stringa 
una volta soltanto e scambiare con essa la vecchia stringa ogni volta che la 
si scopre nel buffer. Questo è, per l’appunto, possibile se si utilizza il 
comando ES (EXCHANGE SAME STRING). 

Si raccomanda di usare il comando per lo scambio delle stringhe con 
molta cautela poiché spesso è facile confondersi nel ricordare i vari 
termini degli scambi effettuati. In pratica, per ridurre le possibilità di 
errore, il comando E (EXCHANGE) è impedito da TEA di essere operativo 
sino a che non si sia trovata una stringa corrispondente. Una volta avvenuto 
lo scambio di una stringa, non può aver luogo un'altro scambio sino a che 
non sia localizzata un'altra stringa mediante uno dei due comandi S 
(SEARCH) o quello N (NEXT). 

Il funzionamento del comando per lo scambio di stringa (E; 
EXCHANGE) è illustrato nell’Esempio 1-20. Si provvede in primo 
luogo al listing del contenuto del buffer in modo da conoscere quanto in 
esso presente. Si ricerca quindi la stringa LOOPIT, per la quale TEA 
trova una stringa corrispondente nella linea due. Si introduce allora il 
comando E (EXCHANGE) seguito da un segno di uguale e dalla stringa 
(TEST3) che deve sostituire LOOPIT. Allorché, alla fine della nuova 
stringa (TEST3), si introduce il CTRL/E, il relativo scambio ha luogo, 
come si può verificare introducendo il comando L21. Poiché, a questo 
punto, è stato erroneamente introdotto una seconda volta il comando E, 
TEA risponde con ? e C=. Dato che è appena avvenuto uno scambio, il 
comando E non può essere usato una seconda volta, sino a che nel 
buffer, non sia stata trovata una seconda stringa. 

Con il comando N (NEXT) si impartisce allora a TEA l’ordine di 
continuare a cercare la stringa LOOPIT, a partire dalla linea tre. 
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Esemplo 1-20. Scambio di stringhe. 

OL 
000 1 

0002 LOOPIT, 

0003 
0004 
0005 
0006 
0007 

OS*LOOPIT 
0002 LOOPIT, 

C= E=TEST3 
C*L2 

0002 TEST3, DCRC /DCRC THE COUNT 

C=E? 

C*N 

0004 LOOPIT /IS NON-ZERO 

C m E* SECON D 
C=L 4 

0004 SECOND /IS NON-ZERO 

OL 
000 1 

0002 TEST3, 

0003 
0004 
0005 
0006 
0007 

OS* SECON D 
0004 


OE-TEST3 

C= 5=» TEST 3 

0002 TEST3, 

DCRC 

/DCRC THE COUNT 


ON 

0004 

TEST 3 

/IS NO.N-Z ERO 


O S* TEST3 

0002 TEST3# 

DCRC 

/DCRC THE COUNT 


OE-NEV 

ON 

0004 

TEST3 

/IS NON-ZERO 


O ES 

OL 

000 1 

•042 34 



0002 NEV, 

DCRC 

/DCRC THE COUNT 


0003 

JNZ 

/LOOP BACK IF THE 

COUNT 

0004 

NEV 

/IS NON-ZERO 


000S 

0006 

0 

RET 

/VHEN IT IS ZERO/ 

RETURN 

0007 

O 


• 



Questa stringa è rinvenuta nella linea quattro e scambiata, stavolta, 
con la stringa SECOND, come si può verificare da listing delle linea 
quattro (L4J). È evidente che, dopo uno scambio, l’introduzione di un 
comando di listing non è per niente necessario. Allo scopo di avere un 
quadro di tutto l’"insieme” si introduce il comando L in modo che sia 
effettuato il listing dell’intero buffer. Come previsto. LOOPIT è stato 
rimpiazzato la prima volta da TEST3 e la seconda da SECOND. 


•042 341 

DCRC /DCRC THE COUNT 

JNZ /LOOP BACK IF THE COUNT 

SECOND /IS NON-ZERO 
0 

RET /VHEN IT IS Z ERO/ RETURN 


SECON D /IS NON-Z ERO 


•042 341 

DCRC /DCRC THE COUNT 

JNZ /LOOP BACK IF THE COUNT 

LOOPIT /IS MON-ZERO 

0 

RET /VHEN IT IS ZERO.» RETURN 


DCRC /DCRC THE COUNT 
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Si passa allora alla ricerca della stringa SECOND e la si sostituisce con 
la stringa TEST3. Cosicché nel buffer vi sono adesso due stringhe TEST3 
(linee due e quattro). Per verificare che TEST3 è ora presente nel buffer 
due volte, si introduce il comando S=TEST3. TEA trova tale stringa 
nella linea due e provvede a stamparla in uscita. 11 comando N (NEXT) 
scopre per la seconda presenza della stringa nella linea quattro. Si 
introduce ancora il comando S=TEST3, ma, questa volta, dopo che 
TEA trova la stringa, si introduce il comando E=NEW, con il quale si 
ottiene lo scambio del primo TEST3 con NEW. Il comando N scopre la 
seconda presenza di TEST3 (nella linea quattro) ed il comando ES fa 
avvenire lo scambio di TEST3 con NEW (la stringa “nuova” introdotta 
in precedenza). Il listing finale permette di verificare che entrambe le 
ricorrenze della stringa TEST3 sono state sostituite con NEW. 


Assemble (assemblare) 

17. Lalettera X è quella impiegata per il comando ASSEMBLE. Dopo 
tale comando non è necessario introdurre nessun RETURN. Allorché si 
introduce questo comando, l’8080 comincia ad eseguire la porzione di 
assembler di TEA. Per le istruzioni di impiego dell’assembler si consulti 
il Capitolo 2. 

C=X Dopo aver premuto il tasto X non vi è alcun bisogno di 
premere il tasto RETURN (1). 

Caratteri particolari 

Tasto RETURN - Mentre è valido il modo di comando, vi sono molti 
comandi che non possono essere eseguiti sino a che non sia stato pre¬ 
muto il tasto RETURN. Tali comandi comprendono I (INSERT) D 
(DELETE), C (CH ANGE), L (LIST) e P (PUNCH). Per altri comandi si 
ha l’esecuzione immediata nel momento stesso in cui sono introdotti, in 
quanto TEA non attende che sia premuto il tasto RETURN. Tali 
comandi comprendono A (APPEND), R (READER), H (HEXADECI- 
MAL), O (OCTAL), X (ASSEMBLE), N (NEXT), e Q (QUERY). I 
comandi S (SEARCH) ed E (EXCHANGE) esigono rispettivamente 
caratteri terminali particolari CTRL/S e CTRL/E. 

Mentre ci si trova in modo di testo, in seguito ad un comando A 
(APPEND), I (INSERT) e C (CHANGE), una linea di testo non sarà 
introdotta nel buffer del testo sino a che non sia premuto il tasto 
RETURN. La risposta di TEA consisterà nel conservare la linea nel 
buffer del testo e nello stampare il numero di linea della prossima linea di 
ordine crescente. 

Tasto LINE-FEED - Allorché TEA sta perforando una banda con il 
contenuto del buffer, ad ogni ritorno del carrello così perforato fa 
seguito un line-feed. Allorché la banda è riletta di nuovo in TEA, questi 
line-feed sono, tuttavia, ignorati. Mentre ci si trova in modo di testo, un 
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line-feed fa sì che siano stampati lo stesso numero di linea ed il testo 
contenuto in quella linea. Ciò si dimostra particolarmente utile nel caso 
che si sia corretto un certo numero di errori valendosi del tasto 
RUBOUT. 

Per ulteriori informazioni si consulti la sezione intitolata Caratteristi¬ 
che Comuni dei Comandi A (APPEND), 1 (INSERÌ), e C(CHANGE) nelle 
prima parte di questo Capitolo. 

Tasto RUBOUT - La funzione di questo tasto, come si è già avuto 
occasione di dire, è quella di permettere la correzione di errori presenti 
nelle linee di testo. Il tasto può essere impiegato solamente per correg¬ 
gere errori in una linea di testo al momento in cui essa è battuta in ingresso. 
Non appena il tasto RETURN è premuto, la linea di testa risulta intro¬ 
dotta nel buffer ed il tasto RUBOUT non può più essere utilizzato per la 
correzione di errori in quella linea. 

LEADER e TRAILER - Allorché si perfora una banda oppure si 
registrano delle informazioni su di un’audio cassetta, prima del testo 
voluto, sono posti in uscita 128 caratteri di testa (leader) (200 ottale, 80 
esadecimale). Dopo che la parte di testo specificata è stata posta in 
uscita, sono posti in uscita anche 128 caratteri di chiusura (trailer) (200 
ottale, 80 esadecimale). 

TEA ritorna quindi al modo di comando per permettere l’introdu¬ 
zione di un altro comando. Allorché avviene la lettura nel microcalcola¬ 
tore di un nastro o di un’audio cassetta, TEA ignora sia il leader che il 
trailer (i caratteri del leader e del trailer non sono cioè trascritti nel 
buffer). 

CTRL/C - Con l’introduzione di un CTRL/C, TEA ritorna immedia¬ 
tamente al modo di comando. Se si è introdotto un comando che, per la 
sua esecuzione, esige che sia premuto il tasto RETURN, un CTRL/C fa 
sì che il comando stesso venga ignorato. Questo naturalmente non 
accade nel caso che il comando non richieda un RETURN. Un CTRL/C, 
ad esempio, non arresterà l’esecuzione da parte di TEA di un comando 
H, O, M, Q, R, A, N, od X, per la semplice ragione che tali comandi sono 
eseguiti non appena si ha l’introduzione del comando di una sola lettera. 

Nel caso che si introduca in TEA una linea di testo mentre ci si trova 
nel modo di testo, un CTRL/C avrà come effetto che TEA ignori la linea 
di testo e ritorni al modo di comando. Evidentemente, come si è già 
avuto modo di dire, questo avverrà soltanto se il CTRL/C è introdotto 
prima che il tasto RETURN sia stato premuto. 

CTRL/T AB (CTRL/I) - TEA è stata scritto in modo che la telescri¬ 
vente o il CRT appaiono dotati di fermi di posizione o tabulazioni (tab 
stop). Tali fermi sono sistemati ad ogni posizione di otto caratteri di una 
linea. Allorché si preme il tasto TAB o quello I mentre è tenuto abbas¬ 
sato il tasto CTRL/C la testina di scrittura della telescrivente o il cursore 
del CRT si spostano del necessario numero di spazi verso destra per 
raggiungere la prossima tabulazione. A questa caratteristica si fa spesso 
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ricorso allorché si introducono in TEA delle istruzioni simboliche (sor¬ 
gente), da assemblare in un secondo tempo. Il ricorso a punti di fermo da 
luogo ad un listing organizzato in modo ordinato nel corso della terza 
passata deH’assembler. L’impiego di punti di fermo in luogo di spazi 
consente una notevole economia di memoria. 

CTRL/S - La funzione del carattere CTRL/S è quella di carattere 
terminale di una stringa di ricerca (introdotta dopo il comando S 
(SEARCH). Ilprocesso di ricerca comincia dal momento in cui è intro¬ 
dotto il CTRL/S. 

CTRL/E -Le funzioni svolte dal carattere CTRL/E sono due. Quando 
si introduce il comando E (EXCHANGE), bisogna introdurre un 
CTRL/E dopo la stringa se si vuole che lo scambio avvenga. Mentre ci si 
trova nel modo di testo, un CTRL/E ha come effetto che l’intera linea di 
testo che si sta battendo sia cancellata. TEA risponde stampando un 
ritorno del carrello, un avanzamento di linea e, quindi, il medesimo 
numero di linea relativo alla linea di testo cancellata. Non appena il tasto 
RETURN è premuto, la linea di testo è introdotta nel buffer ed il tasto 
CTRL/E non può più essere impiegato per cancellare la linea di testo. 


DISPOSITIVI DI I/O 

Nel Capitolo 3 sarà descritto il metodo impiegato da TEA per ottenere 
l’accesso ai dispositivi di I/O ed il modo di cui è possibile modificare le 
subroutine di I/O per adattarsi a dispositivi di I/O diversi. A questo 
punto è comunque opportuno esaminare i termini relativi ai dispositivi 
di I/O adottati nel resto del libro. 

Le subroutine di I/O utilizzate da TEA per comunicare con il mondo 
esterno sono sei. Grazie a queste subroutine di I/O TEA può comuni¬ 
care con una tastiera (IOTEST, IONOEC, IOECHO), una stampante o 
un CRT (IOO), un lettore di banda o un registratore a cassette in playback 
(funzionamento come riproduttore) (IOR) ed un perforatore di banda 
od un registratore a cassette nel modo di registrazione (IOP). I termini 
fra parentesi non costituiscono solamente i nomi delle subroutine di cui 
si vale TEA, ma altresì i nomi che saranno impiegati per riferirsi ai vari 
dispositivi di I/O. Nel caso della tastiera si impiegherà il termine 
IONOEC, di preferenza ai termini altrettanto corretti IOTEST e 
IOECHO. 


Caricamento In Memoria di un Programma Simbolico 
con l'impiego di TEA 

Il caricamento in memoria di un programma sorgente può compiersi 
da uno di questi due dispositivi di I/O: una tastiera ASCII oppure un 
dispositivo periferico nel modo di lettura (lettere di nastro, registratore a 
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cassette funzionante come riproduttore, ecc.). Nel caso che la sorgente 
provenga da una tastiera ASCII, significa che si sta utilizzando il disposi¬ 
tivo IONOEC. 


Se si vale di un “lettore” la sorgente è invece letta da un dispositivo 
periferico IOR. Di norma, il programma sorgente, è all’inizio creato 
valendosi del dispositivo IONOEC (una tastiera ASCII). Dopo che è 
stato creato, il programma sorgente può essere memorizzato nel disposi¬ 
tivo di I/O (IOP). Tale dispositivo può essere un perforatore di banda 
comandato da telescrivente, un registratore a cassette o un qualsiasi 
altro dispositivo periferico che soddisfi le condizioni richieste al disposi¬ 
tivo IOP (si veda il Capitolo 3, Convenzioni di Input/Output). Natural¬ 
mente, il programma sorgente depositato nel dispositivo periferico può 
essere riletto in memoria, valendosi di TEA, in qualsiasi momento per 
mezzo dei comandi A (APPEND), I (INSERT) e C (CHANGE). Il 
programma può essere allora editato e depositato di nuovo nel disposi¬ 
tivo IOP, oppure assemblato valendosi dell’assembler presente all’in¬ 
terno di TEA. I due esempi che seguono chiariscono le modalità di 
impiego di un lettore di banda comandato da telescrivente e da un 
registratore a cassette per introdurre nel buffer un programma sorgente. 


Impiego di un Lettore di Nastro Comandato da Telescrivente per 
Introdurre II Programma Sorgente 

Per caricare nel buffer un programma sorgente contenuto su banda, è 
indispensabile come prima cosa avviare TEA introducendo gli oppor¬ 
tuni indirizzi iniziale e finale del buffer. E bene riservare al buffer quanta 
più memoria possibile. Se, infatti, la memoria specificata è insufficiente, 
può avvenire che TEA stampi il messaggio di errore ME! nel bel mezzo 
della banda. In questo caso l’utente deve servirsi del comando M 
(MEMORY) per accrescere le dimensioni del buffer e quindi ricomin¬ 
ciare la lettura della banda in memoria. 

Dal momento che TEA è stato appena avviato, in memoria non è 
presente alcun programma sorgente, per cui si introduce una N in 
risposta alla domanda “SORGENTE PRESENTE IN MEMORIA?”. 
TEA risponde con C=, al che si preme il tasto R per abilitare il disposi¬ 
tivo IOR (il lettore di banda). La testa della banda è allora posta nel 
lettore. Premendo il tasto A (APPEND), TEA passa al modo di testo. Lo 
switch di selezione della telescrivente è spostato nella posizione START 
e la lettura in memoria della banda può compiersi. 

Allorché avviene la lettura del CTRL/C al termine della banda, TEA 
ritorna al modo di comando e stampa C=. Lo switch di selezione della 
telescrivente può essere riportato nella posizione FREE e la banda tolta. 
Servendosi del dispositivo IONOEC si può allora editare il buffer, 
oppure si può assemblare il contenuto del buffer. Si ricordi che, una 
volta che il CTRL/C è stato letto dalla banda, dispositivo IOR è disabili¬ 
tato. Nell’esempio 1-2 è compreso più d’uno dei passi qui esaminati. 
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Impiego di un Registratore a Cassette per Introdurre 
un Programma Sorgente 

La procedura da eseguire per leggere un programma sorgente da un 
registratore a cassette presenta molte analogie con quella appena utiliz¬ 
zata a proposito della banda perforata. In pratica l’unica differenza 
risiede nella subroutine di I/O che permette di accedere al registratore 
anziché al lettore di banda. 

Dopo che sono stati introdotti gli indirizzi iniziale e finale e TEA è 
stato informato che in memoria non è presente alcun programma sor¬ 
gente, si introduce il comando R (READER). Si avvia allora il registra¬ 
tore nel modo PLAY (riproduci). Allorché dal registratore avviene la 
lettura del leader come si può avvertire dal suono che esso produce, si; 
introduce il comando A (APPEND). Allorché si ha la lettura del 
CTRL/C posto al termine del nastro il dispositivo IOR è disabilitato 
automaticamente e quello IONOEC abilitato. TEA a questo punto, può 
essere utilizzato per editare il programma contenuto in memoria oppure 
per assemblare il programma sorgente. 

Allorché si è trattato dell’impiego di un lettore di banda per leggere in 
memoria un programma sorgente (sezione precedente), si è detto che 
l’Esempio 1-2 presentava il modo in cui TEA era impiegato per questa 
operazione. In realtà, non vi è nessun modo di sapere se in questo 
esempio il programma sorgente proveniva da un lettore di banda oppure 
da un registratore a cassette. L’Esempio 1-2 costituisce un esempio 
valido sia per l’uno che per l’altro caso. Come già detto, l’unica diffe¬ 
renza tra l’impiego del lettore di banda e quello del registratore a cassette 
risiede nella subroutine di I/O che assiste i differenti dispositivi di I/O. 
Nel Capitolo 3, Convenzioni di Input/Output, si avrà modo di trattare 
tanto le modalità secondo cui i dispositivi di I/O sono abilitati e disabili¬ 
tati, quanto le necessarie istruzioni di software relative alle sei subrou¬ 
tine di I/O IOTEST, IONOEC, IOECHO, IOO, IOR, IOP. 


CONSIDERAZIONI CONCLUSIVE SULL’EDITOR 

A proposito dell’impiego dell’editor compreso in TEA è necessario 
ricordare alcuni punti importanti: 

1. TEA provvede da sé a generare e stampare i numeri di linea 
mano a mano che il programma sorgente è introdotto nel buffer 
del testo servendosi dei comandi A (APPEND), I (INSERT),e C 
(CHANGE). L’utente deve preoccuparsi di introdurre i numeri 
solo nel caso che voglia accedere ad una particolare porzione del 
buffer. 

2. Dopo l’introduzione di un comando A (APPEND), I (INSERT) 
e C (CHANGE), TEA si limita a ritornare al modo di comando 
nel caso che sia stato introdotto un CTRL/C. 
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3. TEA salta automaticamente al primo punto di fermo successivo 
(uno ogni otto posizioni di stampa) se si introduce un CTRL/1 e 
un CTRL/B. 

4. Se il buffer si spinge all’interno delle ultime 256 locazioni di 
memoria che producono l'indirizzo finale specificato dall’utente, 
TEA provvede a stampare il messaggio di errore ME! e quindi 
disabilita i comandi A (APPEND) e 1 (INSERT). Per cambiare 
una o più linee di testo, tuttavia, può essere utilizzato il comando 
C (CHANGE). Può, naturalmente, essere utilizzato il comando 
per lo scambio di stringa nel caso che il comando S(SEARCH)c 
quello N (NEXT) abbia scoperto una stringa corrispondente. 

5. Il dispositivo IOR può essere utilizzato per inviare in ingresso al 
buffer del testo un programma sorgente valendosi di uno dei 
comandi A (APPENDI), 1 (INSERT) e C (CHANGE). 

6. Allorché si utilizzano i comandi A (APPEND), I (INSERT) e C 
(CHANGE), ci si può servire del tasto RUBOUT (DELETE) per 
cancellare gli eventuali errori mentre il tasto line-feed può servire 
a stampare la linea corretta. Se si introduce un CTRL/E, l’intera 
linea di testo risulta cancellata.La linea di testo non è introdotta 
nel buffer sino a che non sia premuto il tasto RETURN. 

7. L’impiego del comando E (EXCHANGE) richiede particolare 
attenzione. Occorre conoscere con certezza, volta per volta, 
quale sia la stringa scambiata e con quale stringa avvenga lo 
scambio. Questo comando, il più delle volte, è impiegato per 
correggere un certo numero di errori di ortografia uguali nei vari 
commenti oppure per cambiare tutti i riferimenti ad un certo 
indirizzo simbolico (degli indirizzi simbolici si tratterà nel pros¬ 
simo capitolo). 


Quale esempio conclusivo riguardante l’editor ci si riferisca all’Esem¬ 
pio 1-21. In esso sono utilizzati vari comandi dell’editor attraverso i 
quali si può osservare il modo con cui si accede al buffer, come viene 
modificato e posto su di un dispositivo periferico. I comandi ed il loro 
formato non dovrebbero essere di difficile comprensione. Tra i comandi 
utilizzati nell’esempio ne manca uno, il comando X (ASSEMBLE). 
Prima di ricorrere a questo comando è necessario esaminare quali siano i 
caratteri validi su cui l’assembler è in grado di operare, le varie espres¬ 
sioni simboliche valide, nonché il formato dei programmi che possono 
essere assemblati. 
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Esempio 1-21. Dimostrazione dell'edltor In TEA 


INITtAL ADDRESS T 0050 000 
FINAL ADORESS 7 0060 000 
SOURCE CURRENTLY IN MEMORY T N 
O-A 

0011 /NOV IT\TS THE T1HE FOR ALL GOOSSSD NEH 
I00e /TO COME TO THE AID OF THIERSREIEIR 
0012 /TO COME TO THE AID OF THEIR COUNTRY. 

0003 

0004 /TO BE OR NOT TO BE. THAT IS THE QUESTION. 
0005 ? 

OL 

000 1 /NOV IS THE TIME FOR ALL GOOD MEN 
0002 /TO COME TO THE AID OF THEIR COUNTRY. 

0003 

0004 /TO BE OR NOT TO BE. THAT IS THE QUESTION. 

0005 

OS-MEN 

0001 /NOV IS THE TIME FOR ALL GOOD MIN 


O E»«ONDI 
OLI 

0001 /NOV IS THE TIME FOR ALL GOOD VOMtN 

ONT 
Ol I 

soli /THIS IS A DEMON STRATI ON OF THE EDITOR IN TEA. 
0002 T 
OLI-3 

000 1 /THIS IS A DEMONSTRATION OF THE EDITOR IN TEA. 
0002 /NOV IS THE TIME FOR ALL GOOD VOMEN 
0003 /TO COME TO THE AID OF THEIR COUNTRY. 


OA 

••06 

•010 000 

•••7 PRINT# INXN 

ooos 

MOVAN 

0009 

CPI 

0010 

000 

0011 

R Z 

0012 

CALL 

0013 

TTYOUT 

0014 

• 

0015 

JNP 

0016 

PRINT 

0017 

• 

0010 7 

OQ 

OSI 207 

060 000 

LINE » - 

0018 


/ IN CREN EN T THE MEMORY ADDRESS 
/GET A CH ARAC TER 
/COMPARE IT TO ZERO 

/RETU1M IF IT IS ZERO 
/OTHERVI SE. PRINT THE 
/CHARACTER 

/THEN GET ANOTHER CHARACTER 


OL 1-7 

0001 /THIS IS A DEMONSTRATION OF THE EDITOR IN TEA. 
0002 /NOV IS THE TIME FOR ALL GOOD VOMEN 
0003 /TO COME TO THE AID OF THEIR COUNTRY. 

0004 

0005 /TO BE OR NOT TO BE. THAT IS THE QUESTION. 

0006 *010 000 

000T PRINT. 1NXH /INCREMENT THE MEMORY ADDRESS 


ODl-3 

ODE 
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Esempio 1-21. Continuazione dell'edltor In TEA 


OL 

ISSI 

0012 «010 000 

0003 PRINT» INXH /INCREMENT THE MEMORY ADDRE7 
OS" PRINT 

0003 PRINT» INXH /INCREMENT THE HEMORT ADDRESS 

OOOUTIT 

ON 

00 00 CALL /OTHERVI SE» PR1NT THE 

ON 

oste PRINT 

OES 
ON7 
OEI 
OL 
000 1 


0002 

•010 000 

0003 OUTIT» 

INXH 

/INCREMENT THE MEMORY ADDRESS 

0004 

HO V/M 

/GET A CHARACTER 

0005 

CPI 

/COMPARE IT TO ZERO 

0006 

009 


0007 

RZ 

/RETURN IT IT IS ZERO 

0900 

CALL 

/OTHERVI SE* PRINT THE 

0009 

TTYOUT 

/CHARACTER 

0010 

• 


0011 

JMP 

/THEN GET ANOTHER CHARACTER 

0018 

OUTIT 


0013 

• 



0014 

OD91-IOO 

T 

OD9- 10 

oca 

oooa CALL /OTHERVISE» PRINT THE ASCII 

0009 TTYOtrr /CHARACTER IN THE A RESISTER 

0010 0 /ON THE TD.ETYPEVRITER OR CRT. 

0011 7 

OL 

0001 

oooe *oio ooo 

0003 OUTIT» INXH /INCREMENT THE MEMORY AOORESS 
0104 MOVAH /SET A CHARACTER 

0009 CPI /COMPARE IT TO ZERO 

0006 000 

0007 RZ /RETUfW 1F IT IS ZERO 

0000 CALL /OTHERVI SE» PRINT THE ASCII 

0009 TTYOUT /CHARACTER IN THE A RESISTER 

00 10 0 /ON THE TEL ETYPEVRI TER OR CRT. 

0011 JMP /THEN GET ANOTHER CHARACTER 

0018 OUTIT 

0013 0 

0014 

OH 

IMITI AL ADDRESS 7 
FINAL ADDRESS 7 0070 000 
SOURCE CURRENTLY IN MEMORY 7 Y 
OP 
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Esemplo 1-21. Continuazione dell’edltor In TEA 


•III ili 

•VT1T. INXH/INCREMWT THE HBWW ADDRESS 
NOVAH/GET A CH ARAC TER 
CRI / COMPARE IT TO ZERO 

III 

RZ/RETURM If IT IS ZERO 
CALL/OTHERWI SE. RRINT THE ASCII 
TTYOUT/CHARACTER IN THE A RESISTER 
l/OH THE TELETYPEVRITER OR CRT. 

JMP/THEN QET ANOTHER CHARACTER 

OUTIT 

I 

OS 

ISI 132 
ITI 001 

LINE # - 0014 

OH 

OS 

29 IA 

3* 00 

LINE # - 0014 

OD 

ARI YOU SURE 7 Y 

OH 

INITIAL ADDRESS ? 

FINAL ADDRESS ? 

SOURCE CURA Di TLY IN MEMORY 7 N 
OR 
OA 
7 

OL 


0101 *042 341 

• 102 LOOPIT. DCRC /DECRIMENT THE COUNT 

• 113 JNZ /LOOP BACK IF THE COURT 

0004 LOOPIT /IS NON-ZERO 

1105 I 

1116 A ET /VHEN IT IS ZERO. RETURi 

• 0IT 

O I I 

1001 /THIS IS OUR OLO FAUORITEI 

1112 7 

OLI-5 

0001 /THIS IS OUR OLD FAVORI TE I 
•112 *042 341 

• 013 LOOPIT. DCRC /DECREMINT THE COINT 

1114 JNZ /LOOP BACK IF THE COUNT 

1115 LOOPIT /IS NON-ZERO 

O 
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CAPITOLO 2 


Modalità di impiego 
deN’Assembler 


Nel capitolo precedente si è visto come l’editor incorporato in TEA 
possa essere utilizzato per creare un programma sorgente. Tale pro¬ 
gramma può contenere valori relativi ai dati simboli di istruzioni, com¬ 
menti e indirizzi simbolici. L’editor, in ogni caso, non ha modo di sapere 
che lo si sta utilizzando per editare un programma: per quanto lo 
riguarda, infatti, il suo impiego potrebbe avere indifferentemente lo 
scopo di stilare una lettera, un elenco di spedizioni o il manoscritto di un 
libro. L’editor di limita a manipolare caratteri e stringhe di caratteri. 
Esso non ha alcuna nozione, e, daltronde, non è affare che lo riguardi, 
circa la natura di ciò che si introduce nel buffer tramite la tastiera, il 
lettore di banda perforata e il registratore a cassette, ma si limita a 
manipolare il contenuto del buffer in conformità ai comandi dell’utente. 

Purtroppo, il programma sorgente memorizzato nel buffer con l’im¬ 
piego dell’editor non può essere eseguito dall’8080. Si ricordi, infatti, che 
le linee di testo sono composte di caratteri ASCII che l’editor non ha 
fatto altro che memorizzare in tante locazioni di memoria una di seguito 
all’altra. Le stringhe di caratteri ASCII devono essere in qualche modo 
convertite negli uni e zeri logici costituenti i codici operativi op-code 
delle istruzioni dell’8080 o i valori corrispondenti ai dati. Una volta che 
le linee di codice sono state convertite in qualcosa su cui l’8080 possa 
operare, queste devono essere caricate in memoria così che l’8080 possa 
prelevare dalla memoria questi valori di otto bit e trattarli, a seconda del 
caso, come istruzioni oppure come dati. 

Nel caso che non si disponga di un editor e di un assembler, oppure che 
il sistema “calcolatore” sia troppo piccolo per riuscire a fungere da 
supporto di un editor e un assemblèr, i programmi devono essere redatti 
e assemblati manualmente. 

Essi devono cioè, prima essere scritti su un foglio di carta e poi 
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impaginati, cancellando e spostando istruzioni sino a che la sequenza di 
istruzioni non assuma una forma appropriata. Il programma è quindi 
assemblato manualmente. Tale lavoro implica il prendere in considera¬ 
zione i simboli nelle istruzioni contenuti nel listing del programma e 
cercare i corrispondenti codici operativi (op-code) su di una scheda o 
elenco fornito dal fabbricante. È ovvio che tale metodo di assemblaggio 
manuale è poco sicuro e comunque eccessivamente lento. 

È proprio per aggirare questi problemi di edizione e assemblaggio dei 
programmi che sono stati scritti editor e assembler suscettibili di essere 
impiegati per modificare dei programmi sorgenti e convertirli altresì in 
codice macchina comprensibile per il calcolatore. In questo caso, TEA è 
stato scritto in modo da poter essere eseguito sui microcalcolatori basati 
sull’8080, 8085 o Z-JO. Esso può essere impiegato per editare frasi 
simboliche che costituiscono altrattante istruzioni dell’8080, nonché 
convertire tali istruzioni in codici operativi che l’8080 è in grado di 
eseguire. 


CARATTERISTICHE DELL’ASSEMBLER 

L’Assembler di TEA può essere utilizzato per assemblare (1) pro¬ 
grammi completi memorizzati nel buffer del testo oppure (2) programmi 
memorizzati su banda perforata. Nel caso che Passembler debba assem¬ 
blare un programma leggendolo da banda, esso effettua la lettura di una 
sola linea del programma sorgente per volta dal dispositivo periferico. 
Elabora quindi la linea appena letta e, in capo ad un breve intervallo di 
tempo, passa a leggere dal dispositivo periferico un’altra linea del pro¬ 
gramma sorgente. Anche se, malauguratamente, la maggior parte dei 
registratori a cassette non possono essere utilizzati per leggere una riga 
del programma sorgente per volta, a questo scopo tuttavia, può servire 
egregiamente la maggioranza dei lettori di banda, unità floppy disk e 
registratori digitali. 

Per assemblare un programma, indipendentemente dalla sua prove¬ 
nienza (memoria o banda perforata), TEA deve operare con due o tre 
passate; deve, cioè, esaminare dal principio alla fine il programma 
sorgente due o tre volte. Nel caso che il programma completo sia già 
presente in memoria, a TEA possono occorrere da 15 a 20 secondi per 
effettuare la prime due passate. Nel caso, invece, che TEA debba leggere 
il programma sorgente da banda perforata per le prime due passate 
possono essere necessari anche 10 o 20 minuti. 

Nel corso della prima passata, TEA provvede a generare una tabella 
dei simboli degli indirizzi, assegnando cioè, ad ogni indirizzo simbolico 
presente nel programma un indirizzo a 16 bit. L’indirizzo così associato 
a ciascun indirizzo simbolico è determinato dalla sua “posizione” nel 
programma. Nel corso della prima passata, perciò, il lavoro svolto da 
TEA è poco apppariscente. Esso, infatti non comporta nè la perfora¬ 
zione di una banda nè la stampa di un listing del programma assemblato 
sul CRT o su telescrivente. Degli indirizzi simbolici e del metodo di 
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indirizzamento simbolico si avrà occasione di trattare più dettagliata- 
mente nella sezione che segue in questo stesso capitolo. 

Nel corso della seconda passata, TEA comincia effettivamente il 
processo di conversione delle stringhe di caratteri ASCII costituenti le 
espressioni mnemoniche (istruzioni) nei codici binari che l’8080 è in 
grado di eseguire. È in questa fase che TEA provvede a perforare una 
banda con il programma assemblato che rappresenta una versione 
oggetto del programma stesso. Tale banda perforata può essere letta nel 
sistema in un momento successivo valendosi del comando B (BOOT- 
STRAP) per far si che il programma sia eseguito. TEA inoltre, può 
caricare il programma assemblato direttamente in memoria mentre si 
effettua la perforazione della banda. Per eseguire un programma non è 
cioè necessario che la sua versione assemblata sia stata preventivamente 
riportata su banda perforata o registrata su audiocassetta. 

TEA si avvale della terza passata per produrre un listing del pro¬ 
gramma assemblato. Nel corso di questa, TEA provvede a fare il listing 
del programma sorgente generato dall’utente, unitamente ai codici 
binari da lui stesso generati, in corrispondenza delle espressioni simboli¬ 
che contenute nelle varie linee del programma sorgente e dagli indirizzi 
di memoria dove quei codici dovranno essere memorizzati. Il listing si 
dimostra davvero prezioso in tutti quei casi in cui si impiega un 
DEBUGGER per localizzare gli errori di un programma, fornendo 
informazioni complete sull’ubicazione delle subroutine, dei dati provvi¬ 
sori e delle istruzioni. Il listing costituisce inoltre un elemento fondamen¬ 
tale della indispensabile documentazione relativa ad un dato pro¬ 
gramma. Di un programma infatti, non è sufficiente possedere le istru¬ 
zioni operative, ma si deve altresì conservare il listing più aggiornato, 
completo di note sulle modifiche e inserimenti. 

Nel corso della terza passata attraverso il programma, TEA provvede 
anche a stampare il contenuto della tabella dei simboli degli indirizzi, la 
quale conterrà tutti gli indirizzi simbolici definiti dall’utente insieme agli 
indirizzi a 16 bit che sono stati assegnati. Questa tabella è disposta in 
ordine alfabetico. Al termine, nonché alla fine di ogni passata effettuata 
dall’assembler attraverso il programma, è stampato il numero di errori 
rilevati insieme dall’assembler. 

Le istruzioni che TEA deve eseguire per il corretto ordinamento della 
tabella dei simboli degli indirizzi sono particolarmente laboriose. Tra 
l’istante in cui TEA ha terminato il listing del programma e quello in cui 
avviene la stampa dei contenuti della tabella dei simboli degli indirizzi 
può dunque trascorrere un tempo non trascurabile. A titolo di esempio, 
per l’ordinamento di una tabella dei simboli degli indirizzi contenente 
540 indirizzi simbolici, il tempo impiegato da TEA è pari a 90 se 

Naturalmente, uno dei vantaggi di avere editor e assembler presenti 
contemporaneamente in memoria è quello di poter utilizzare l’editor per 
la correzione degli eventuali errori scoperti dall’assembler, ripetendo poi 
una seconda volta l’assemblaggio del programma. Questa caratteristica 
può essere sfruttata solamente nel caso che il programma da assemblare 
sia memorizzato tutto insieme in memoria. Se, infatti, si scoprisse un 
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errore mentre si sta procedendo alla lettura di una banda particolar¬ 
mente lunga, sarebbe necessario rileggere nell’editor quella sezione della 
banda, correggere l’errore e quindi perforare un nuovo nastro. Il pro¬ 
cesso di assemblaggio dovrebbe allora riprendere dall’inizio, dal punto 
cioè, in cui la banda è letta in ingresso nel corso della prima passata 
dell’assembler. E superfluo perciò osservare come l’assemblare un pro¬ 
gramma partendo da banda perforata costituisce un compito lungo e 
monotono. 

La funzione dell’assembler di TEA è quella di creare una versione del 
programma sorgente che sia eseguibile dalla macchina. Naturalmente, 
come si è già avuto modo di constatare, l’editor di TEA può anche essere 
utilizzato per evitare una qualsiasi combinazione di lettere e parole 
presenti nel text buffer. L’assembler, in ogni caso non può far altro che 
tradurre delle specifiche sequenze di caratteri in un programma oggetto 
che l’8080è in grado di eseguire. Il resto di questo capitolo si occupa delle 
sequenze di caratteri traducibili dall’assembler, dei messaggi di errore 
generati in caso che queste presentino degli errori, nonché del modo di 
servirsi dell’assembler per l’assemblaggio di un programma sorgente. 


FRASI (STATEMENTS) 

Ogni frase, ovvero linea di testo (codice), che l’assembler traduce in 
un’istruzione eseguibile dalla macchina o in un byte di dati si compone di 
un certo numero (da uno a tre) di campi. I campi e la loro posizione nella 
linea di testo (codice) sono i seguenti: 


Codice Operativo 

Etichetta oppure /Commento dell’Utente 

dato 

Il campo d t\V etichetta (label) della frase è costituito dal nome simbo¬ 
lico inventato dal programmatore per identificare in un programma una 
particolare istruzione o un particolare dato. L’etichetta o indirizzo sim¬ 
bolico può quindi essere impiegata dal programmatore come riferimento 
alla locazione di memoria utilizzata per memorizzare l’istruzione o il 
dato. Gli indirizzi simbolici possono essere formati da un numero qual¬ 
siasi di lettere o da una qualsiasi combinazione di lettere e numeri, anche 
se, generalmente, la lunghezza dell’indirizzo simbolico dovrebbe essere 
limitata a cinque o sei caratteri. Una particolare sequenza di caratteri 
deve essere impiegata una sola volta nel campo delle etichette e ad ogni 
sequenza di caratteri disposta nel campo delle etichette deve seguire 
immediatamente una virgola. Allorché nel campo delle etichette ci si 
serve di un indirizzo simbolico, si dice che esso è definito. 

Il secondo campo della linea di testo (codice) può contenere o il valore 
di un dato oppure una delle istruzioni simboliche dell'8080. Il formato 
valido per questi dati e istruzioni sarà esaminato fra breve. Subito dopo 
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il dato o il simbolo dell'istruzione, la linea di testo conterrà (I) uno 
spazio, (2) un RETURN, (3) una tabulazione o ancora, (4) una barretta 
(per un commento). 

Il campo dei commenti contiene un testo composto di parole, frasi o 
affermazioni aventi lo scopo di fornire chiarimenti sull’operazione ese¬ 
guita dall’istruzione o sul dato contenuto nella linea di testo. Il com¬ 
mento può contenere qualsiasi carattere ad eccezione de! segno distintivo 
de! dollaro ($). I commenti sono sempre preceduti da una barra (/). 

La struttura di TEA è relativamente elastica. I commenti e le istruzioni 
non devono necessariamente stare in campi rigorosamente delimitati. Le 
parole relative alle istruzioni o ai dati non hanno alcun obbligo di 
trovarsi in un campo distante otto spazi dal margine di sinistra; esse 
possono essere disposte ovunque in una linea di testo. Se, tuttavia, una 
linea contiene un indirizzo simbolico, l’istruzione, il dato oppure il 
commento devono trovarsi alla'sua destra. L’unica condizione “di strut¬ 
tura” che deve essere soddisfatta è che gli indirizzi simbolici, quando 
sono definiti, abbiano inizio al margine di sinistra. Nessuno spazio o 
tabulazione può precedere in alcun caso un indirizzo simbolico definito. 

L’unico motivo per cui è consigliabile mantenere i vari clementi in 
campi separati (indirizzi simbolici nel campo delle etichette, dati o 
simboli di un’istruzione nel secondo campo c commenti nell’ultimo) 
consiste nel vantaggio che il programma si presenti in un formato di 
agevole lettura. Se gli indirizzi simbolici, i dati, i simboli relativi alle 
istruzioni ed i commenti fossero disposti in ordine sparso, sarebbe 
difficile individuare un simbolo di istruzione non corretto e far risaltare 
il punto in cui un indirizzo simbolico è stato effettivamente definito. 
Mentre l’Esempio 2-1 presenta un programma memorizzato in un for¬ 
mato ben ordinato, il programma il cui listing compare nell’Esempio 2-2 
non è per niente chiaro. Anche se entrambi i programmi possono essere 
assemblati da TEA senza errori, il programma presentato dall’Esempio 
2-1 darà luogo ad un listing molto più ordinato in fase di assemblaggio. 


Esemplo 2-1. Listing ben ordinato di un programma generato dell'edltor di 

TEA. 


OL 




gasi 

•042 341 


SI 02 

LOOPIT* DCRC 

/DECREHENT THE COUiT 

0113 

JNZ 

/LOOP BACK XF THE 

COINT 

0114 

LOOPXT 

/IS NON-ZERO 


IMS 

• 



1006 

HOT 

RET 

/VHEN XT XS Z ERO# 

RETUM 

o 





Esemplo 2-2. Un listing disordinato dello stesso programma dell'esempio 2-1. 

OL 

««•1 *142 341 

SSS2 LOOPIT, DCRC /DECRMBJT THE COINT 
1113 JHZ/LOOP BACH I T THE COINT 
SSI4 L00P1T/15 NON -Z ERO 

0005 0 

gote Ftrr /vhen it is zero, return 

SSST 

o 
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Indirizzo simbolico 


Come indirizzo simbolico può essere utilizzata una generica stringa di 
caratteri ASCII composta di lettere, ovvero di lettere e numeri. Allorché 
si definisce un indirizzo simbolico, questo deve apparire nel primo 
campo della linea di testo a cominciare proprio dll’inizio della linea. 
Esso, inoltre, non deve essere preceduto da nessuno spazio o tabula¬ 
zione. All’indirizzo simbolico, così definito, è assegnato un valore di 16 
bit nel “contatore dell’indirizzo attuale’’ (ADDCNT) allorché TEA 
procede a creare la tabella dei simboli degli indirizzi nel corso della 
prima passata del procedimento di assemblaggio. 


Esemplo 2-3. Impiego di Indirizzi simbolici In un programma. 


TEST. 


•oto 003 

H VI A /LO AD THE A REGI STER VITH THE ASCII 
10 1 /VACUE FOR THE LETTER "A" 

CALL /THEN PRINT THE CHARACTER ON THE 
TTYOUT /TELETYPEVRITER OR CRT. 

0 

H VI A /LOAD THE A RESISTER VITH THE ASCII 

075 /VALUE FOR AN E8UAL S1GN. MD 

CALL /PRIHT IT. 

TTYOUT 

0 

HLT /THIN KALT. 


TTYOUT. NOVBA 
TTYO. IN 
001 
ANI 
004 
JZ 
TTYO 
0 

MOVAB 

OUT 

000 

RET 


/SAVE THE CHARACTER IN B 
/INPUT THE UART'S STATUS WORD. 

/SAVE ONLY THE TRAN SHITTER 'S FLAO 
/IF A* 0 04. THE PRINTER IS READY 
/IT A«000. THE PRINTER IS BUSY 
/IT THE PRINTER IS BUSY. VAI T 
/FOR IT TO BE FINI SHED. THEN THE 
/A REGI STER CMI BE PRINTED 
/AFTER THE CHARACTER IS HOVED FROM 
/B TO A. OUTPUT IT TO THE UART. 
/RETUW VITH THE CHARACTER IN A. 


La scelta degli indirizzi simbolici deve tenere conto della seguente 
condizione limitativa: nessun indirizzo simbolico di tre caratteri può 
terminare con una H. Non possono, ad esempio essere impiegati come 
indirizzi simbolici ASH, 12H e HOH, per la ragione che essi hanno lo 
stesso formato standard dei numeri esadecimali, cosicché TEA sarebbe 
indotto a trattarli come tali. Nel corso del procedimento di assemblag¬ 
gio, TEA non stamperebbe nessun genere di messaggio di errore incon¬ 
trando un indirizzo simbolico A IH o FFH. 

Nell’Esempio 2-3 vi sono tre indirizzi simbolici definiti, TEST 
TTYOUT e TTYO. Allorché questo programma è assemblato, a TEST è 
assegnato l’indirrizzo a 16 bit 010 003 (0803 esadecimale), a TTYOUT 
l’indirizzo 010 016 (080E esadecimale) e a TTYO l’indirizzo 010 017 
(080F esadecimale). Tali indirizzi saranno utilizzati dall’assembler tutte 
le volte che il programma farà riferimento a TEST, TTYOUT o TTYO. 
Assemblando questo programma si può constatare come a questi indi¬ 
rizzi simbolici siano assegnati proprio questi valori di 16 bit. 

Nell’Esempio 2-4 riporta il listing del programma assemblato gene¬ 
rato nel corso della terza passata. Benché non se ne sia ancora parlato, si 
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Esemplo 2-4. Programma dall'Esempio 2-3 In versione assemblata. 


DtRORS DETECTED « SSS 


TYCHOf» EDITOR-ASSWBLER V-3 


PAGE II-SII 






••Il 113 


111 

003 

176 

TEST# 

MV1A 

/LOAD THE A REGI STER VITH 

THE ASCII 

III 

104 

101 


101 

/VALVE KOR THE LETTER *A" 


• Il 

00S 

315 


CALL 

/THDi PRINT THE CHARACTER 

ON THE 

III 

• 16 

016 


TTYOUT 

/ TEL ETYPEVRI TER OR CRT. 


III 

017 

• 10 


0 



III 

• Il 

• 76 


H VI A 

/LOAD THE A REGI STER VITH 

THE ASCII 

III 

111 

075 


07 5 

/VALUE rOR AH EOUAL SI W. 

AND 

III 

ne 

315 


CALL 

/PRINT IT. 


III 

113 

116 


TTYOUT 



•Il 

0M 

110 


• 



111 

113 

166 


HLT 

/THEN HALT. 


Oli 

• 16 

107 

TTYtUT# 

HO VBA 

/SAVE THE CHARACTER IN B 


III 

117 

333 

TTYO# 

IN 

/INPUT THE UART'S STATUS WORD. 

III 

tei 

• Il 


Oli 



III 

tei 

346 


ANI 

/SAVE OMLY THE TRANSHITTER'S FLAG 

Ilo 

tee 

104 


014 

/IT A a 904# THE PRINTER 1S 

READY 

no 

023 

312 


JZ 

/1F A* 009# THE PRINTER 1S 

BUSY 

•Il 

• 24 

• 17 


TTYO 

/IT THE PRINTER 1S BUSY# 

WAIT 

111 

025 

III 


• 

/F8R IT TO BE FINI SHED. 

THDI THE 

III 

026 

170 


HOVAB 

/A REGI STER CAM BE PRINTED 

111 

027 

323 


OUT 

/AFTER THE CHARACTER IS HOVED FROM 

•Il 

030 

III 


000 

/B TO A# OUTPUT IT TO THE 

UART. 

III 

• 31 

311 


RET 

/RETUHI VITH THE CHARACTER IN A. 


può osservare come l’impiego dell’asterisco (*) abbia la funzione di 
contrassegnare o definire un indirizzo del programma. Poiché l’asterisco 
è seguito dall’indirizzo 010 003, sarà questo il primo indirizzo utilizzato 
dal programma. Ne deriva che il TEST comincia alla locazione di 
memoria 010 003 (0803esadecimale). Il codice operativo corrispondente 
all’istruzione simbolica M VI A (076 ottale, 3E hex) sarà memorizzato in 
questa locazione di memoria allorché sarà letta in memoria la banda 
perforata nel corso della seconda passata dell’assembler. Il fatto note¬ 
vole che non deve sfuggire in questo esempio è l’impiego dell’indirizzo 
010 016 nelle due occasioni in cui l’indirizzo simbolico TTYOUT era 
stato richiamato dalle istruzioni CALL, nonché l’impiego dell’indirizzo 
assegnato a TTYO, 010 017 (080F hex), da parte dell’istruzione JZ alla 
fine dell’esempio. 

In molti dei prossimi esempi ci si servirà ancora di listing di pro¬ 
grammi assemblati. Come si può constatare, agli indirizzi simbolici sono 
stati realmente assegnati gli indirizzi appropriati. Allorché nell’ambito 
di un’istruzione ci si vale di indirizzi simbolici, come nel caso delle due 
istruzioni CALL e di quella JZdell’Esempio 2-4, l’assembler fa uso degli 
indirizzi appropriati. 

Numeri 

In un programma possono essere utilizzati numeri ottali ed esadeci- 
mali, in nessun caso numeri decimali. Salvo diversa indicazione, TEA 
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interpreta i vari numeri come ottali. Un numero ottale si compone di 
alcune cifre da una a tre, comprese tra zero e sette. Per valersi di numeri 
esadecimali, questi devono essere di due cifre ed essere seguiti da un H. I 
numeri 2H e 01FH non sono numeri esadecimali validi. 


ISTRUZIONI VALIDE E LORO FORMATO 

Nel secondo campo di una linea di testo ci può servire di una delle 
istruzioni simboliche dell’8080 oppure di un dato di 8 bit (in forma ottale 
o esadecimale). In questa sezione del capitolo, si tratterà pertanto del 
formato da rispettare per le istruzioni a uno, due e tre byte dell’8080. 


Istruzioni a Un Solo Byte 

Per le istruzioni ad un solo byte l’utente non dispone di nessuna 
opzione. I simboli mnemonici utilizzati in molti manuali, libri e nella 
documentazione delle specifiche deH’8080 sono riconosciuti da TEA. 
Esso incorpora una tabella, detta tabella dei simboli permanenti, conte¬ 
nente tutti i simboli delle istruzioni dell’8080 accompagnati dal codice 
operativo a 8 bit relativo a ciascun simbolo. Le istruzioni ad un solo byte 
incluse nella tabella dei simboli permanenti comprendono: MOV (da 
registro a registro e da/a registro a/da memoria), HLT, INR, DCR, 
ADD, ADC, SUB, SBB, ANA, XRA, ORA, CMP, RLC, RRC, RAL, 
RAR, e tutte le istruzioni di ritorno (RET, RZ, RNZ, RC, RNC, RPO, 
RPE, RM, ed RP). La tabella dei simboli contiene anche le istruzioni di 
“push” e di “pop” (PUSHPW, PUSHB, PUSHD, PUSHH e POPSW, 
POPB, POPD e POPH) insieme alle istruzioni che riguardano copie di 
registri XCHG, XTHL, SPHL, PCHL, DADB, DADD, DADH, 
DADSP, STAXB, STAXD, LDAXB, LDAXD, INXB, INXD, INXH, 
INXSP, DCXB, DCXD, DCXH e DCXSP. 

Nella tabella dei simboli permanenti sono altresì memorizzate le 
istruzioni relative al registro A e cioè CMA, STC, CMC e DAA, come 
pure le istruzioni di restart (RST1, RST2, RST3, RST4, RST5, RSTóed 
RST7) insieme alle istruzioni EI, D1 e NOP. La tabella comprende infine 
anche le due nuove istruzioni dell’8085 SIM e RIM. Affinchè possano 
essere correttamente interpretati da TEA, i programmi devono conte¬ 
nere questi simboli di istruzione nell’esatta forma in cui sono stati 
riportati. Questo significa che l’istruzione MOVAB non deve essere 
introdotta in un programma nella forma MOV A, B nè in quella MOVA, 
B. Altri simboli non validi sarebbero RST1, INX H DAD B e INR E. 
Non vi devono essere, cioè, spazi e virgole che separino i registri tra di 
loro e dal resto del simbolo. Il mancato rispetto di questo formato 
determina il rilevamento di almento un errore da parte di TEA nel corso 
sia della prima che della seconda passata dell’assemblaggio. 

Il programma elencato nell’Esempio 2-5 contiene un certo numero di 
simboli di istruzione validi a uno e tre byte che TEA è in grado di 
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Esemplo 2-5. Alcune Istruzioni ad un solo byte valide che TEA è In grado di 
assemblare senza errori. 


oc 




Itti 


••23 : 

34( 

(812 

ADDIT# 

DADH 

/MU.T1 PCY HAL BY TUO 

1(0 


DCRB 

/DECREN BIT THE COIMT 1M B 

(((4 


JMZ 

/IT THE RESULT IS NON-ZERO. 

(((3 

(((6 


ADDIT 

• 

/MULTI PLY H AL AGA1N 

(0(7 


IN RC 

/THEO INCREHENT THE COUNT IN C 

(((■ 


DADD 

/AND ADD THE VALUE IN DAE 

(((9 

((IO 

0(11 


XCHG 

ret 

/SVAP DAE VITH HAL 

(812 

POPIT# 

INXSP 

/INCREMBOT THE STAOC POINTER 

8(13 


DADSP 

/ADD THE SP TO HAL 

>00 14 


MOVAM 

/SET A DATA VALUE 

0015 


RRC 

/ROTATE IT TO THE R1GHT 

((16 


SUB E 

/SUBTRACT E 

((17 


HOVUA 

/SAVE THE VALUE BACK ON THE STACK 

((!• 


RNC 

/AETURt IP THE CARRY IS ZERO 

8(19 


IN RM 

/OTHERV1 SE INCREHENT MEMORY 

0020 

(021 


RET 

/AMD THEN RETURN 


interpretare correttamente. Il loro impiego non dà luogo a nessun mes¬ 
saggio di errore. L’Esempio 2-6 contiene invece alcuni simboli non 
validi, con il risultato che TEA stamperà altrettanti messaggi di errore 
dovuti, appunto, all’impiego di simboli così fatti. Gli unici simboli validi 
dell’esempio 2-6 sono, infatti, soltanto XCHG, RET, RNCe RRC. Tutti 
gli altri presentano delle virgole o degli spazi e non sono, perciò, accetta¬ 
bili. 

Esemplo 2-6. Impiego di un (ormato non corretto per alcune Istruzioni ad un 

solo byte dell'8080. 


C-L 

(((1 


•023 

341 


(8(2 

ADDIT# 

DAD 

H 

/MULTI PLY HAL BY TVO 

(8(3 


DCR 

B 

/DECADIINT THE COUNT IN B 

(((4 


JNZ 

ADDIT 

/ir NON-ZERO/ MULTI PLY AQA1N 

0005 


1NR 

C 

/INCRMNT THE COIMT IN C 

0006 

(((7 

(0(0 

(((9 


DAD 

XCHG 

RET 

D 

/THEN ADD DAE TO HAL 
/EXCHANSE DAE VITH HAL 

(d( 

POPIT# 

INX 

SP 

/ IN CADI INT THE STACK POINTER 

(811 


DAD 

SP 

/ADD THE SP TO HAL 

((12 

(813 


MOV 

RRC 

A#N 

/SET A DATA VALUE 
/ROTATE IT TO THE R10HT 

((14 


SUB 

E 

/SUBTRACT E 

(815 

8(16 


MOV 

RNC 

N# A 

/SAVE THE VALUE 

/RCTUM ir THE CARRY IS ZERO 

(817 


1NR 

N 

/OTHERVISEj INCREHENT MEMORY 

((IO 

(819 

» 


RET 


/AMD THB* RETURN 

Istruzioni a 

Due Byte 



Le istruzioni a due byte possono essere suddivise o in istruzioni di 
ingresso/uscita (I/O) oppure in istruzioni immediate. Le istruzioni di 
I/O possono presentare sia un numero ottale che uno esadecimale 
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Esempio 2-7. Formato appropriato per le istruzioni IN e OUT. 


>L 

assi 

90 02 


•034 

1 56 

0003 

TEST# 

IN 

/GET A VACUE rAON THE SVITCHES 

0004 

ooos 


034 

OUT 

/OUTPUT IT TO THE DISPLAYS 

0006 

0007 


DISP 

RET 

/RETTJBJ VITH THE VACUE IH A 

ooos 

0009 

TEST2# 

XRAA 

/SET THE A RESISTER TO ZERO 

0010 


OUT 

/OUTPUT IT TO THE D/A CON VERTER 

osti 

soie 


3 EH 
OUT 

/AND AC SO TO THE A/D MULTI PL EX ER 

0013 

0014 


MUX 

RET 

/RETUJW VHEN DOME 

001S 

0016 





0 » 

oppure anche una stringa di caratteri definita dalla pseudo-op (pseudo¬ 
operazione) DB come il codice dispositivo di un dispositivo di I/O. Il 
numero ottale, o quello esadecimale, o la stringa di caratteri, costituisce 
il secondo byte dell’istruzione a due byte, mentre il primo byte sarà il 
simbolo dell’istruzione IN o OUT. L’Esempio 2-7 include un certo 
numero di istruzioni di I/O valide nel formato ad esse appropriato. 

Nell’Esempio 2-7 la subroutine TEST dapprima pone in ingresso un 
dato proveniente dalla porta di ingresso 034 (ottale) (uno C hex), e 
quindi pone in uscita lo stesso dato alla porta di uscita alla quale è stata 
associata la stringa di caratteri DISP. Mediante una delle pseudo-op di 
TEA, è possibile assegnare un numero di 8 bit (ottale ovvero hex) ad una 
stringa di caratteri, come, appunto, DISP. In TEST2 si azzera il registro 
A mediante l’istruzione XRAA e quindi se ne pone in uscita il contenuto 
alla porta di uscita 3F (077 ottale) ed a quella MUX. L’8080 ritorna a 
questo punto dalla subroutine TEST2. 

La subroutine, il cui listing è riportato nell’Esempio 2-8, contiene 
cinque simboli non validi. I secondi byte delle istruzioni IN e OUT non 
devono essere contenuti nella stessa linea di testo in quanto gli indirizzi 
delle porte devono essere contenuti in quella immediatamente succes¬ 
siva, come illustrato nell’Esempio 2-7. Inoltre l’istruzione XRAA non 
deve presentare uno spazio o un punto di fermo tra XRA ed A. 

Le istruzioni immediate ammettono o un numero ottale, ovvero un 
numero esadecimale o una stringa di caratteri definita dalla pseudo-op 

Esemplo 2-8. Formato non corretto per le istruzioni IN e OUT dal quale 
consegue che TEA genera alcuni messaggi di errore. 


C-L 

0001 


*•34 

156 


ssoe 

TEST# 

IN 

• 34 

/GET A VACUE non THE SVITCHES 

0003 


OUT 

DI SP 

/OUTPUT IT TO THE DISPLAYS 

0004 

ooos 


RET 


/RETURN VITH THE VALUE IN A. 

0006 

TEST2# 

XRA 

A 

/COAD THE A RESISTER VITH ZERO 

0007 


OUT 

3 rn 

/OUTPUT IT TO THE D/A CON VERTER 

ooos 


OUT 

MUX 

/AC SO OUTPUT IT TO THE A/D MULTI PL EX ER 

00 09 
0010 


RET 


/RETIMI VHIN DOME 

o 
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Esemplo 2-9. Impiego di numeri oliali, esadeclmall, caratteri Ira virgolette e 
byte definiti (stringhe di caratteri) quali byte di dato per alcune Istruzioni e 
due byte dell'8080. 

o»l l- 1S 


IMI 

* 0 1 • 

000 

IMS KEYIN, 

IN 

/GEI A CH ARAC TER FRON THE 

0113 

TTY 

/ASCII KEYBOARD 

1114 

CPI 

/IS THE A XET PRESSEST 

IMS 

•A* 


MI* 

UN 2 

/NO» TH» VAI T FOR IT 

MIT 

KEYIN 

/TO BE PRESSED. 

MM 

0 


0019 

N VI A 

/THE A KEY IS PRESSED, SO 

MIO 

34H 

/OUTPUT THE VACUE 34 iOCTAL 64) 

ioti 

OUT 

/TO SOM E SEVM-SEOHENT DI SPI. ATS 

Mie 

SSD 


1113 

ADI 

/ADD AN IMMEDIATE DATA BYTE 

1014 

195 

/OF 105 (HEX 45) AND OUTPUT 

0015 

OUT 

/THE RESULT TO SOME DISCRETE LEDS 

0116 

203 


MIT 

HLT 

/THEN HALT. 


sete 

DB o, infine, un carattere tra virgolette. Le istruzioni immediate in 
oggetto comprendono MVIA, MVIB, MVIC, MVID, MVIE, MVIH, 
MV1L, MVIM, ADI, ACI, SUI, SBI, ANI, XRI, ORI, e CPI. Le istru¬ 
zioni IN e OUT, insieme a quelle appena viste, sono le uniche istruzioni a 
due byte riconosciute da TEA. L’Esempio 2-9 contiene alcune istruzioni 
di questo tipo con la dimostrazione delle differenti modalità in cui queste 
possono essere utilizzate. Nell’Esempio 2-9 l’8080 pone in ingresso un 
dato dal dispositivo di I/O definito mediante le stringa TTY. Tale dato è 
caricato nel registro A dell’8080 dove avviene il confronto con l’equiva¬ 
lente ASCII di A. Allorché TEA assembla la linea di testo che contiene il 
carattere tra virgolette, secondo byte dell’istruzione immediata, utilizza 
come byte di dato immediato l’equivalente ASCII del carattere tra 
virgolette. Nel corso della seconda passata dell’assembler, l’equivalente 
ASCII sarà perforata su banda o registrato su cassetta. Esso apparirà 
anche nella stampa del listing generato con la terza passata dell’assem- 
bler. 

Se il tasto A dell’Esempio 2-9 non è premuto, l’8080 salta indietro a 
KEYIN. Se, invece, il tasto A è premuto, il registro A è caricato, per 
effetto dell’istruzione MVIA, con il numero esadecimale 34 (064ottale). 
Tale valore è quindi posto in uscita verso alcuni display a sette segmenti 
definiti dalla stringa di caratteri SSD. Al contenuto del registro A è poi 
sommato un byte immediato pari a 105 (45 hex) ed il risultato di questa 
somma è posto in uscita verso il dispositivo di uscita 203 (83 hex), dopo 
di che l’8Ò80 si ferma. 

Allorché provvede ad assemblare il programma dell’Esempio 2-9, 
TEA stampa un indirizzo ed un valore relativo ai dati per ogni linea di 
testo. Questo fa sì che, allorché passa a stampare la linea che contiene 
TTY/ASCII KEYBOARD, TEA debba stampare il valore definito in 
precedenza come equivalente alla stringa TTY. L’8080 dovrà, inoltre, 
procedere in modo del tutto analogo a proposito della stampa del 
secondo byte, SSD, dell’istruzione OUT. Dovrà cioè, cercare il valore da 
stampare in una tabella dove esso è definito come equivalente alla 
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stringa SSD. Al momento di assemblare l’istruzione CPI, TEA determi¬ 
nerà l’ equivalente ASCII del carattere tra virgolette. In questo caso 
l’equivalente ASCII della lettere A è 101 (41 hex), valore che sarà 
appunto stampato insieme all'indirizzo di memoria in cui sarà memoriz¬ 
zato in occasione del caricamento del programma in memoria. 

L’Esempio 2-10 contiene due istruzioni a due byte scritte in un for¬ 
mato non corretto. Il secondo byte deil’istruzione MVIA deve trovarsi 
nella linea immediatamente successiva a quella del simbolo MVIA. Tra i 
due byte dell’istruzione non possono esservi, infatti, ne linee vuote e 
neppure linee contenenti commenti. Analogamente, l’indirizzo di dispo¬ 
sitivo dell’istruzione OUT non deve essere separato dal simbolo OUT da 
uno spazio vuoto o da un commento. Se si prova ad assemblare il 
programma dell’Esempio 2-10, la precedenza di questi due errori fa 
stampare due messaggi di errore. Come si può notare, il secondo byte 
dell'istruzione a due byte deve trovarsi nella prima linea di tasto che segue, 
immediatamente dopo quella contenente il simbolo mnemonico dell'istru¬ 
zione. Poiché, nell’esempio 2-10, tale regola non è rispettata, ne derivano 
dei messaggi di errore. 

Esempio 2-10. Metodo non corretto di impiego di Istruzioni a due byte. 

oli-* 

essi 

SI 12 START. 

issa 
ISSA 
sois 
su» 

1017 

usa 
in* 

Istruzioni a Tre Byte 

L’8080 è dotato di un certo numero di istruzioni a tre byte, in cui 
ciascun byte dell’istruzione deve essere memorizzato in una distinta linea 
di testo. Le istruzioni a tre byte necessitano, perciò, di tre linee di testo 
consecutive, proprio come per la memorizzazione delle istruzioni a due 
byte occorrono due linee di testo consecutive e per quelle ad un solo byte 
una singola linea di testo. I byte secondo e terzo delle istruzioni a tre byte 
possono consistere in due numeri ottali, due numeri esadecimali, un 
numero ottale ed uno esadecimale, un indirizzo simbolico definito inter¬ 
namente al programma o un indirizzo simbolico che è stato definito 
mediante una pseudo-operazione. Un indirizzo simbolico definito all in¬ 
terno del programma consiste in un indirizzo simbolico che si trova nel 
primo campo di una linea di testo. 

Questo comporta che in quella linea davanti ad esso non figurano ne 
spazi ne tabulazioni e che nella linea stessa, immediatamente dopo 
l’indirizzo simbolico, sia memorizzata una virgola. Indirizzi simbolici 
così definiti sono già stati visti ed utilizzati in precedenza. 

Se, come secondo e terzo byte di un’istruzione a tre byte, si impiegano 
due numeri ottali, o esadecimali, oppure un numero ottale ed uno 


• ni in 

H VI A /LOAD THE A RESISTER VI TU 

123 /123 (HEX 33) 

OUT /OUTPUT THE VALUE 70 SOHE 

/SEVM-SEONMT DI SPLAYS THAT 
113 /ARE INTERFACE!) TU THE MSI 

HLT /THDJ HALT 
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esadecimale, ciascuno numero deve essere posto in una distinta linea di 
testo. Se nell’istruzione a tre byte si impiega un indirizzo simbolico, 
indipendentemente da come lo si sia definito, la stringa di caratteri che lo 
rappresenta deve essere posta nella seconda linea. Per seconda linea si 
intende la linea di testo immediatamente seguente quella che contiene il 
simbolo dell’istruzione. La terza linea dell’istruzione deve contenere uno 
zero, in quanto questo zero nella terza linea dell’istruzione ha la funzione 
di “lasciare lo spazio" all’assembler per sistemare il byte alto dell’indi¬ 
rizzo dell’istruzione nel corso della seconda (perforazione di una banda) 
e terza passata (listing del programma assemblato) del processo di 
assembling. 

Le istruzioni a tre byte che possono valersi delle varie combinazioni di 
numeri ottali ed esadecimali e degli indirizzi simbolici comprendono 
tutte le istruzioni di salto (JMP, JNZ, JNC, JZ, JC, JPO, JPE, JPe JM); 
tutte le istruzioni di chiamata (CALL, CNZ, CZ, CNC, CC, CPO, CPE, 
CP e CM); e le istruzioni di caricamento e memorizzazione a 16 bit 
(LXIB, LX1D, LXIH, LXISP, LHLD ed SHLD). Pure comprese nel 
gruppo delle istruzioni a tre byte sono le istruzioni STA ed LDA ope¬ 
ranti sul contenuto del registro A. In particolare si osservi come nelle 
istruzioni LXIB, LXID, LXIH ed LXISP non siano presenti spazi vuoti 
ne tabulazioni e neppure virgole. Se a queste istruzioni fossero aggiunti 
degli spazi, tabulazioni o delle virgole, TEA non sarebbe in grado di 
assemblare correttamente i simboli e ne risulterebbero dei messaggi di 
errore. 

Nel listing dell’Esempio 2-11 sono presenti alcune istruzioni a tre byte. 
Dal momento che la prima istruzione di chiamata (CALL) utilizza un 
indirizzo simbolico, la terza linea dell’istruzione contiene uno zero. 
Allorché TEA procede ad assemblare tale istruzione, esso stampa gli 
otto bit low dell’indirizzo di 16 bit assegnato a TTYIN insieme alla linea 

Esemplo 2-11. Impiego di numeri ottali, esadecimali ed Indirizzi simbolici per II 
secondo e terzo byte delle Istruzioni a tre byte. 


C*L 1- 

23 



tssi 


•AFH 0 OH 

0 0 0 2 

BYTE3# 

CALL 

/GET A CHARACTER FROM THE 

0003 


TTYIN 

/TELETYPEVRI TER *S KEYBOARD* 

iosa 


0 


ooos 


CPI 

/IS THE A KEY PRESSED? 

0006 


•A* 


0007 


CZ 

/YES# THEN PRINT A CARRIAGE 

oooa 


172 

/RETUfW AND LIME FEED ON THE 

0009 


1CH 

/TILETYPEVRI TER 

0010 


JMP 

/THEN JUHP BACH TO BYTE3 

0011 


BYTE3 


0012 


0 


0013 




soia 

LOAD> 

LHLD 

/LOAD HAL VXTH THE CONTENT OF 

0013 


TENPO 

/MEMORY AT "TEMPO" AND "TEMPO* 1 * 

0016 


0 


0017 


SHLD 

/THEN SAVE THE 16-BIT VALUE 

soia 


CHARIN 

/IN "CHARIN" AND "CHARIN*1" 

0019 


e 


0020 


JMP 

/THEN JUHP TO THE SYSTEM MONITOR 

0021 


000 

/IN EPRON* 

0022 


374 


0023 
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di testo “TTYIN/TELETYPEWRITER’S KEYBOARD". Allorché 
TEA stampa la terza linea di testo, gli otto bit alti dell’indirizzo di 16 bit 
sono stampati insieme allo zero contenuto in tale linea di testo. L’istru¬ 
zione a tre byte seguente, CZ, presenta come secondo byte un numero 
ottale ed un numero esadecimale come terzo byte. Ne consegue che, 
premendo il tasto A della tastiera della telescrivente, l’8080 effettua una 
chiamata della subroutine memorizzata in memoria all’indirizzo 1CH 
172(034 172 ottale, 1C7A hex). Come ormai dev’essere noto, allorché la 
terza istruzione a tre byte, JMP, è assemblata, l’8080 provvede a leggere 
l’indirizzo di 16 bit corrispondente a BYTE3 nella tabella dei simboli 
degli indirizzi che TEA ha composto nel corso della prima passata, 
indirizzo che sarà stampato in occasione della stampa della seconda e 
terza linea dell’istruzione JMP. 

La seconda parte dell’Esempio 2-11 contiene tra le istruzioni a tre 
byte. TEA provvederà a cercare nella tabella degli indirizzi gli indirizzi di 
16 bit corrispondenti a TEMPO e CHARIN, che saranno poi utilizzati 
nel corso della seconda e terza passata dell’assembler. I due numeri ottali 
impiegati nell’istruzione JMP saranno assemblati come secondo e terzo 
byte dell’istruzione, poiché TEA non ha bisogno di far riferimento alla 
tabella dei simboli degli indirizzi per determinare l’appropriato indirizzo 
di 16 bit in base ai numeri ottali 000 e 374. 

Al pari delle istruzioni a due byte, anche quelle a tre byte devono 
essere comprese tutte in tre linee di testo consecutive. 

Nell’Esempio 2-12, tutte e tre le istruzioni a tre byte sono scritte in un 
formato non corretto. Il secondo e terzo byte della prima istruzione 
CALL sono infatti separati dalla prima linea dell’istruzione dalla pre¬ 
senza di un commento. Lo zero della terza linea di testo che segue CALL 
TO LPRINT è separato dagli altri due byte dell’istruzione da una linea 
vuota. Nell’ultima istruzione a tre byte il simbolo JMP è separato 
dall’indirizzo simbolico START e dallo zero da una linea vuota. Se si 
volesse assemblare il programma dell’Esempio 2-12, si otterebbero dei 
messaggi di errore. Come si può osservare, il secondo e terzo byte 
dell’istruzione devono essere memorizzati nelle prime due linee di testo 
immediatamente seguenti alla linea di testo che contiene il simbolo mnemo¬ 
nico dell'istruzione stessa. 

L’Esempio 2-12 contravviene appunto a questa regola. 

Esempio 2-12. Istruzioni a tre byte utilizzate in modo non corretto. 


OLI- 

14 



0001 


•023 145 

0002 

0003 

START# 

CALL 

/GET A CHARACTER FRON THE 
/TELETYPEVRITER'S KEYBOARD 

0904 


TTYIN 

/AND RETVFN VI TH IT IN THE 

0005 


0 

/A REGI STER 

0006 


CALL 

/THEN PRINT THE CHARACTER 

HOT 

0008 


LPRINT 

/ON THE LINE PRINTER AN D 

9099 


0 

/RETUfW VITH THE CHARACTER IN A. 

0010 

0011 


JMP 

/THIN GET AN«THER CHARACTER 

0012 


START 

/FROM THE KEYBOARD AND 

0013 

0014 


e 

/PRINT IT. 
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PSEUDO-OP (pseudo-operazioni) 


Anche se già si è avuto occasione di osservare il funzionamento di una 
pseudo-operazione (pseudo-op), può essere che tale circostanza, per 
qualcuno, sia passata inosservata. Il carattere asterisco (*) costituisce 
una pseudo-op in quanto essa informa l’assembler incorporato in TEA 
che i caratteri che vengono dopo di esso (numeri ottali o esadecimali) non 
devono essere interpretati come un’istruzione dell’8080, bensì devono, 
invece, essere trattati come un indirizzo. Le pseudo-op, dunque, deter¬ 
minano l’esecuzione di particolari operazioni da parte dell’assembler. 
TEA è dotato di quattro pseudo-op le cui caratteristiche di funziona¬ 
mento sono presentate qui di seguito. 

Asterisco (*) 

In molti degli esempi fin’ora incontrati si è avuto modo di osservare la 
presenza di un asterisco all’inizio di un programma o di una subroutine. 
La funzione dell’asterisco è quella di segnalare all’assembler che nel 
programma è stato appena definito un nuovo indirizzo. Mediante l’im¬ 
piego dell’asterisco, è Vutente che decide personalmente il punto esatto in 
memoria in cui qualsiasi istruzione o dato sarà memorizzato in fase di 
assemblaggio del programma e di caricamento in memoria della ver¬ 
sione oggetto di quel programma. Indipendentemente dal numero di 
volte che l'asterisco è utilizzato per la definizione di un nuovo indirizzo 
di 16 bit, tutti gli indirri devono essere definiti usando lo stesso formato. 

Un indirizzo definito mediante l’asterisco deve seguire immediata¬ 
mente quest’ultimo. Esso può essere indifferentemente composto di due 
numeri ottali, due numeri esadecimale oppure una combinazione qual¬ 
siasi dei due. Tra il primo byte di 8 bit dell’indirizzo ed il secondo byte di 
8 bit dello stesso indirizzo deve comunque esservi uno, e soltanto uno, 
spazio vuoto. Anche se un programma può contenere un qualsiasi 
numero di indirizzi definiti mediante l’asterisco, questi devono tuttavia 
conformarsi tutti a questo formato. La mancata definizione di almeno un 
indirizzo del programma dà luogo ad un messaggio di errore. La funzione 
dell’asterisco presenta strette analogie con quella della pseudo-op ORG 
presente in altri assembler. 

Contrassegno del Dollaro ($) 

La funzione del contrassegno del dollaro ($) è quella di segnalare 
all’assembler incorporato in TEA che è arrivato al termine del pro¬ 
gramma sorgente nel corso del suo procedimento di assemblaggio. 
Qualunque simbolo mnemonico di istruzione, indirizzo simbolico, dato 
o commento memorizzato nel buffer del testo dopo il segno del dollaro 
non è preso in considerazione. Per questo motivo, un segno del dollaro 
non deve mai essere presente in un commento nè essere utilizzato come byte 
di dato immediato tra virgolette. Come già noto, TEA può servire ad 
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assemblare un programma memorizzato internamente in memoria come 
pure un programma memorizzato su banda perforata e suddiviso in 
blocchi di 100-200 linee di testo. 

Nel caso che TEA stia provvedendo ad assemblare un programma 
memorizzato interamente in memoria, non è necessario che esso termini 
con un segno del dollaro. L’assembler contenuto in TEA conosce, 
infatti, il punto esalto in memoria in cui il programma sorgente termina. 
Se, tuttavia, il programma sorgente è assemblato da banda perforata, al 
termine dell’ultimo blocco del programma bisogna che sia perforato 
sulla banda un contrassegno di dollaro. Questo si ottiene, naturalmente, 
memorizzando un segno di dollaro nel text buffer valendosi dell’editor 
perforando, quindi, il contenuto del buffer sulla banda di uscita. L’as¬ 
senza di un segno di dollaro al termine dell’ultimo blocco della banda 
perforata non darà luogo ad un messaggio di errore, bensì avrà per 
effetto che TEA si comporti come se di seguito vi fosse un altro blocco di 
testo. TEA proseguirà, perciò, leggendo un altro blocco di testo dal 
dispositivo IOR di I/O. Ne risulta che, se si dimentica il segno del 
dollaro, non sarà possibile superare la fase di prima passata dell’assem- 
bler. Anche se, per i programmi che sono assemblati dalla memoria, un 
segno di dollaro alla fine non è strettamente necessario, è tuttavia buona 
norma memorizzare comunque un segno di dollaro al termine del pro¬ 
gramma. Se, infatti, il programma cresce al punto di non poter più essere 
memorizzato integralmente in memoria, il segno del dollaro sarà intro¬ 
dotto automaticamente sulla banda perforata all’atto del trasferimento 
del buffer. 

11 segno del dollaro che conclude il programma non compare stam¬ 
pato in fondo al programma stesso in occasione del listing delle terza 
passata. Esso è equivalente alla pseudo-op END di altri assembler. 


Deflne Byte (definisci il byte) 

Questa pseudo-op (defined byte: DB) ha la funzione di assegnare un 
certo numero ottale o esadecimale (otto bit) ad una stringa di caratteri. 
Tale valore, assegnato dall’utente alla stringa, sarà impiegato dall’as- 
sembler nel corso della seconda e terza passata. Ogniqualvolta l’assem- 
bler incontra nel programma quella stessa stringa, esso perforerà su 
banda il valore assegnato dall’utente (seconda passata), oppure ne elen¬ 
cherà il valore (terza passata). Il corretto formato da osservare per la 
pseudo-op DB è mostrato nell’Esempio 2-13. 

In questo esempio tutte le stringhe di caratteri sono separate da un 
“DB” da uno spazio, ed uno solo. Il numero ottale o esadecimale è pure 
esso separato allo stesso modo dalla stringa di caratteri. La pseudo-op 
DB deve essere utilizzata unicamente all'inizio di un programma, prima 
di qualunque indirizzo simbolico, indirizzo definito (*) o simbolo di 
istruzione. Anche se essa può trovarsi in uno qualsiasi dei tre campi del 
formato dell’assembler, è consigliabile, se non altro per chiarezza, che 
essa cominci all’inizio del secondo campo. 
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Esempio 2-13. Impiego della pseudo-op DB per assegnare un valore ottale o 
esadeclmale di otto bit ad una stringa di caratteri. 


OL 

«gai 


DB START 001 

•002 


DB SSD 

3FH 

• 003 


DB CR 

015 

0004 


DB LF 

012 

0005 

0006 


•076 354 

0007 

CRLF# 

MVIA 

/LOAD THE A REGI STER VITH THE 

•oos 


CR 

/ASCII VALUE FOR A CARRI AG E RETUTtl 

0009 


CALL 

/PRINT THE VALUE ON THE 

0010 


TTYOUT 

/TILETYPEVRITER OR CRT. 

0011 

0012 


0 

MVIA 

/LOAD THE A REGI STER VITH THE 

0013 


LF 

/ASCII VALUE FOR A LINE FEED 

0014 


CALL 

/PRINT THE VALUE ON THE 

0015 


TTYOUT 

/TELETYPEVRlTER OR CRT 

0016 

0017 


0 

MVIA 

/THDJ .LOAD THE A REGI STCT VITH 

00 1» 


START 

. /A VALUE FOR THE SEVDf-SEGMENT 

• 019 


OUT 

/DI SPLAYS Mi D OUTPUT IT 

0020 

0021 


SSD 

HLT 

/THEN HALT 

0022 

0023 

o 

t 




I byte definiti possono essere utilizzati unicamente come byte di dato 
immediato (per le istruzioni matematiche, logiche e di spostamento di 
dati di tipo immediato e come byte di indirizzo di dispositivo, per le 
istruzioni a due byte IN e OUT). E chiaro che utilizzare un byte definito 
in un’istruzione ad un solo byte non riveste un grande interesse. Si può 
anche pensare di utilizzare due byte definiti per il secondo e terzo byte di 
un’istruzione a tre byte, ma a questo scopo si dispone di un’altra pseudo- 
op apposita (assegnazione di un numero di 16 bit come valore di una 
stringa di caratteri). 

Nell’Esempio 2-13 sono comprese alcune pseudo-op. Tutti i byte 
definiti sono stati definiti in base alla pseudo-op DB prima di qualsiasi 
simbolo mnemonico di .istruzione o indirizzo definiti (*076 354). Se dei 
byte di 8 bit fossero definiti con la pseudo-op DB in qualsiasi altro punto 
del programma che non sia la “testa” del programma stesso, si avrebbe 
un messaggio di errore. 

Provvedendo ad assemblare il programma dell’Esempio 2-13, TEA 
assegnerà dei valori di 8 bit alle quattro stringhe ASCII. 

II byte di dato immediato della prima istruzione NVIA riceverebbe il 
valore 015 (OD hex) ed il byte di dato immediato della seconda istruzione 
MVIA avrebbe il valore 012 (0A hex). Assemblando la terza istruzione 
MVIA, si impiegherà il byte di dato immediato 001 (01 hex) è, per 
l’istruzione OUT, l’indirizzo di dispositivo della porta di uscita sarà 3F 
(077 ottale). Si osservi la presenza del segno di dollaro al termine di 
questo programma. 

Deflne Word (definisci la parola) 

La pseudo-op define-word (definisci la parola: DW) serve ad asse- 
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gnare un numero ottale o esadecimale di 16 bit ad una stringa di 
caratteri. Il valore che l’utente assegna alla stringa sarà impiegato dal- 
l’assembler nel corso della seconda e terza passata. Ogniqualvolta incon¬ 
tra quella stessa stringa, l’assembler perfora o lista il valore assegnato 
dall’utente. Le parole definite possono essere utilizzate per formare delle 
liste di valori, oppure impiegate in istruzioni a tre byte in modo del tutto 
analogo agli indirizzi simbolici (la seconda linea contiene le stringa, la 
terza uno zero). Il formato corretto per la pseudo-op di definizione di 
parola (DW) è illustrato nell’Esempio 2-14. 

In questo esempio la stringhe di caratteri SYSMON, DEBUG, 
STACK e TTYIN sono separate da “DW” con uno, ed uno solo, spazio 
vuoto così come si usa un solo spazio per separare la stringa dagli otto bit 
più significativi del numero di 16 bit. Anche gli otto bit meno significativi 
del numero sono separati da un solo spazio da quelli più significativi. Si 
osservi come, analogamente alle stringhe definite dalla pseudo-op DB, le 
stringhe definite dalla pseudo-op D W devono apparire proprio all’inizio 
del programma precedendo qualunque simbolo mnemonico di istru¬ 
zione, indirizzo simbolico o indirizzo definito (*). 

Nell’assemblare il programma elencato nell’Esempio 2-14, TEA si 
servirà degli opportuni numeri di 16 bit ogniqualvolta incontrerà la 
stringa definita dalla pseudo-op D W nel secondo e terzo byte di un’istru¬ 
zione TEA utilizzerà, dunque, l’indirizzo 170 80H (170 200 ottale, 7880 
hex) come secondo e terzo byte dell’istruzione LXISP e l’indirizzo FDH 
043 (375 043 ottale, FD23 hex) come secondo e terzo byte dell’istruzione 
CALL. Come si può immaginare, anche gli indirizzi definiti corrispon¬ 
denti a SYSMON e DEBUG saranno impiegati nei punti opportuni. 

TEA stamperà un messaggio di errore tutte le volte che come secondo 
byte di un’istruzione a due o tre byte si impiega una stringa che non sia 

Esempio 2-14. Impiego della pseudo-op DW per assegnare un indirizzo di 16 
bit ad una stringa di caratteri. 


OL1-24 



000 1 

DV SYSMON 374 000 

0002 

DW DEbVG 

8 OH 0 OH 

0003 

DV STACK 

170 8OH 

• 004 

DW TTYIN 

FDH 043 

0005 



0006 

•000 000 


0007 START/ 

LXISP 

/LOAD THE STACK POINTER VJTH 

0008 

STACK 

/A R/V MEMORY ADDRESS. 

0009 

0 


0010 

CALL 

/GET A CHARACTER FROM THE 

00 1 1 

TTYIN 

/TELETYPEVR1TER OR CRT. 

0012 

0 


0013 

CPI 

/VAS AN *S* ENTERED? 

0014 

-S- 


0015 

JZ 

/YES. THEN JU1P TO THE 

0016 

SYSMON 

/SYSTEM MONITOR PROGRAM. 

0017 

0 


0018 

CPI 

/VA5 A "D* ENTEREDT 

0019 

•D* 


0020 

JZ 

/YES» THEN JUHP TO THE 

0021 

DEBUG 

/ASSEM6LY LAMGUAGE 

0022 

0 

/DE&UQGER PROGRAM 

0023 

HLT 

/NOT Alt S OR « Di SO HALT 

0024 S 
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Esemplo 2-15. Impiego della pseudo-op DW per assegnare un numero di 16 bit 
ad una stringa di caratteri. 


OL 1- 
0091 

14 

DV COUNT 00 1 370 

0002 

0003 


•003 

341 

0004 

VAIT# 

LXID 

/LOAD REGI STER PAIR D VITH 

0005 


COUNT 

/A 16-HIT NUMfìER TO BE 

0006 


0 

/DECREMENTED 

0007 

VAITI# 

DCXD 

/DECREHENT THE COUNT 

0008 


HOVAD 

/GET THE NSBY OF THE COINT 

0009 


ORA E 

/OR IT VITH THE LSBY 

0010 


JN2 

/ir THE COUNT IS NON- 

0011 


VAITI 

/ZERO# JUHP BACK TO THE 

0012 


0 

/DCXD INSTRUCTION 

0013 


RET 

/THEN RETURN VHEN THE COINT 

0014 

S 




stata definita nè mediante una pseudo-op DB o DW, nè come indirizzo 
simbolico definito all’interno del programma). 

11 motivo che spiega questo comportamento, ovviamente, è che TEA 
non ha modo di determinare il valore (i valori) da impiegare come 
secondo o secondo e terzo byte dell’istruzione. 

La pseudo-op DW non ha solo la funzione di definire un’indirizzo di 
una subroutine o l’indirizzo di partenza di un altro programma, come 
nell’Esempio 2-14 in cui essa è stata, per l’appunto, utilizzata per definire 
indirizzi di 16 bit. Se lo si desidera, la pseudo-op D W può anche servire a 
definire un numero da utilizzare per un conteggio o che sia utile per altre 
operazioni di manipolazione dei dati, come appunto appare nell’Esem¬ 
pio 2-15. 

In questo esempio si assegna alla stringa COUNT il valore 001 370 
(01F8). Provvedendo ad assemblare il simbolo di istruzione LXID,TEA 
si accorge che si tratta di un’istruzione a tre byte, cosicché il secondo e 
terzo byte possono essere numeri ottali o esadecimali, un indirizzo 
simbolico od una stringa definita dalla pseudo-op DW. Ne risulta che, 
come secondo byte dell’istruzione, si utilizza il valore 370 (F8 hex) e 
quello 001 (01 hex) come terzo byte. Si ricordi come in tutte le istruzioni a 
tre byte gli otto bit meno significativi del numero di 16 bit sono impiegati 
come secondo byte mentre gli otto bit più significativi costituiscono il 
terzo byte. L’esempio 2-16 contiene la versione assemblata della subrou¬ 
tine elencata nell’Esempio 2-15. 

Esemplo 2-16. Assemblaggio della subroutlne listata nell’esempio 2-15. 


DV COUNT 001 370 


•003 341 


103 

341 

021 

VAI T# 

LXID 

/LOAD REGI STER PAIR D VITH 

003 

342 

370 


COUNT 

/A 16-BIT NUNBER TO BE 

003 

343 

001 


8 

/DECREN ENTED 

003 

344 

033 

VAITI# 

DCXD 

/DECREHENT THE COUNT 

003 

345 

172 


NOVAD 

/GET THE NSBY OF THE COUNT 

003 

346 

263 


ORAE 

/OR IT VITH THE LSBY 

003 

347 

302 


JNZ 

/IT THE COUNT IS NON- 

003 

350 

344 


VAITI 

/EERO# JUMP BACK TO THE 

003 

351 

003 


0 

/DCXD INSTRUCTION 

003 

352 

311 


RET 

/THEN RETUFN VHEN THE COINT 
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CARATTERI SPECIALI 


In molti esempi precedenti si è già potuto osservare l’effetto di alcuni 
caratteri speciali caratterizzati da un’azione analoga a quella della 
pseudo-op. Essi, cioè, fanno sì che Passembler di TEA esegua delle 
operazioni particolari invece di interpretare la stringa di caratteri come 
un valore numerico, un simbolo di istruzione o un indirizzo simbolico. I 
caratteri che si sono già incontrati sono l’asterisco (*; impiegato per la 
definizione di indirizzi), il contrassegno del dollaro ($; impiegato per 
denotare la fine di un programma) ed il carattere virgolette (“; impiegato 
allorché occorre un valore ASCII come byte di dato di un’istruzione 
immediata). Tra i caratteri che TEA considera come speciali ve ne sonò 
ancora altri. 

Più (-(-) e Meno (—) 


Questi due caratteri servono al programmatore per sommare (♦) 
oppure sottrarre (—) uno scostamento dall’indirizzo assegnato ad un 
indirizzo simbolico. Lo scarto può essere espresso da un qualsiasi 
numero ottale o esadecimale compreso fra 000 377, ossia tra 00 ed FF. 
L’Esempio 2-17 illustra il modo di utilizzare un byte di scostamento. 

Esemplo 2-17. Somma di un byte di scostamento ad un Indirizzo simbolico. 


C-L 1- 

oooi 

14 

DV CO UNI 001 370 

0002 
18 03 


•003 341 

0084 

VAI T# 

LXID 

/LOAD REGI STER PAIR D VITH 

0005 


COUNT 

/A 16* BIT Nili BER TO BE 

0006 


0 

/DECREMENTED 

0007 


DCXD 

/DECREM Di T THE COLNT 

ooos 


MOVAD 

/GET THE HSBY OF THE COUNT 

0009 


ORAE 

/OR IT VITH THE LSBY 

0010 


JNZ 

/IF THE COINT IS NON- 

0011 


VAI T* 3 

/Z ERO* JUMP BACK TO THE 

0012 


0 

/DCXD INSTRUCTION 

0013 


RET 

/THEN RETURN VHIN THE COUNT IS ZERO 

0014 

% 




In questo esempio compare la stessa subroutine listata in origine 
nell’Esempio 2-15, con una modifica. Anziché impiegare gli indirizzi 
simbolici WAIT e WAIT1, tutti i riferimenti a WAIT1 sono stati tramu¬ 
tati in WAIT più un certo scostamento, invece di saltare a WAIT1, 
l’8080 salterà all’indirizzo uguale alla somma di WAIT più tre (ottale). 
Come si può ben immaginare, il risultato finale non cambia; l’8080 
effettua ancora un salto indietro all’istruzione DCXD. Dalla versione 
assemblata si questa subroutine elencata nell’Esempio 2-18, si può osser¬ 
vare come l’8080 abbia, in pratica, effettuato un calcolo consistente nel 
sommare tre all’indirizzo di 16 bit assegnato a WAIT, utilizzandone poi 
il risultato come secondo e terzo byte dell’istruzione JNZ. Da un con¬ 
fronto dei listing dell’Esempio 2-16 e di quello 2-18, si può constatare 
come i programmi assemblati che ne risultano siano completamente 
uguali. 
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Esemplo 2-18. Assemblaggio di una subroutlne contenente uno scostamento 
sommato ad un Indirizzo simbolico. 





DV COIMT 001 370 




•003 341 

003 

341 

021 VA1T* 

LX1D 

/LOAD REGI STER PAIR D VITH 

003 

342 

37 0 

COUNT 

/A 16-BIT N UH BER TO BE 

003 

343 

001 

0 

/DECRETI EH T ED 

003 

344 

033 

DCXD 

/DECRETI ENT THE COUNT 

003 

345 

172 

MOVAD 

/GET THE MSBY OF THE COtNT 

003 

346 

263 

ORA E 

/OR IT WITH THE LSBY 

003 

347 

302 

J*£ 

/ir THE COUNT IS NON - 

003 

350 

344 

VAI T* 3 

/ZERO/ JtHP BACK TO THE 

003 

351 

003 

0 

/DCXD IN STRUCTION 

003 

352 

311 

RET 

/THEN RETUW VHEN THE COtHT IS ZERO 


Un rischio insito nell’impiego di uno scostamento (sia esso ottale o 
esadecimale) dipende dal fatto che il programmatore deve determinare il 
numero da sommare o sottrarre affinchè TEA generi l’indirizzo deside¬ 
rato. Benché nell’Esempio 2-17 questo sia relativamente agevole, si 
danno dei casi in cui la determinazione dello scostamento ottale o 
esadecimale corretto comporta un lavoro ben più arduo, specialmente 
quando lo scostamento è maggiore di 30 o 40. Un’altro problema che 
spesso si accompagna all’impiego dello scostamento consiste nel fatto 
che, in seguito all’aggiunta o all’eliminazione di istruzioni, bisogna 
provvedere a cambiare anche lo scostamento, come mostrano gli Esempi 
2-19 e 2-20. 

Nell’Esempio 2-19 sono state aggiunte alla subroutine alcune istru¬ 
zioni di push (PUSHD e PUSHPSW) e pop (POPPSW e POPD). Lo 
scopo per cui queste istruzioni sono state aggiunte alla sobroutine è di far 
sf che la soubrotine non “influenzi” nessuno dei registri. Dato che 
all’inizio della subroutine sono state aggiunte due istruzioni, WAIT » 3 
avrebbe dovuto essere cambiato in WAIT 4 5, ma il programmatore se ne 
è dimenticato. Ne risulta che, allorché la subroutine è assemblata (Esem¬ 
pio 2-20), TEA calcola un indirizzo sbagliato per il secondo e terzo byte 

Esemplo 2-19. Aggiunta di Istruzioni ad una subroutlne che utilizza uno 
scostamento con un Indirizzo simbolico. 


C=L 




000 1 


DV COUNT 

COI 37U 

0002 




0003 


*003 341 


0004 

vait. 

PUSHD 

/SAVE. D«E ON THE STACK 

0005 


Pl'SHPSV 

/AND THEN THE PSV 

0006 


LXID 

/LO AD REGI STEP. PAIR D VITH 

0007 


COUNT 

/A 16-bIT NUMbEK TO bF 

0008 


0 

/DECRETI ENTED 

0009 


DCXD 

/DECRETIENT THE COINT 

00 1 0 


MOVAD 

/GET THE MSbY OF THE COINT 

00 1 1 


ORaL 

/OR IT UITH THE LSbY 

0012 


JNZ 

/IF THE COUNT IS NON- 

00 13 


VaI T* 3 

/ZERO/ JITIP bACK TO THE 

00 14 


0 

/DCXD INSTRl'CTION 

0015 


POPPSV 

/THE COINT IS ZERO/ POP THE 

00 16 


POPD 

/PSV AND REGI STER PAIR D 

0017 


RLT 

/THEN RETURN VHEN THE COUNT IS ZERO 

0018 

5 



00 19 




C- 
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Esemplo 2-20. Assemblaggio della subroutlne contenente Istruzioni addizionali 
ed uno scostamento (Esemplo 2-19). 


DM COUNT est 37 9 


•93 341 325 VAI T/ 

993 342 365 

003 343 921 

•03 344 370 

003 345 001 

003 346 033 

003 347 172 

003 350 263 

•03 351 302 

003 352 344 

•93 353 003 

003 354 361 

003 355 321 

003 356 311 


•003 341 

PUSHD /SAVE D6E ON THE STACX 

PUSHPSV /AND THDJ THE PSV 

LXI D /LOAD REGI STER PAIR D VITH 

COUNT /A 16-BIT NUMBER TO BE 

• /DECREMENTED 

DCXD /DECREHENT THE COUNT 

MOVAD /SET THE HSBY OF THE COUNT 

ORAE /OR IT VITH THE LSBY 

JHZ /IF THE COUNT IS NON- 

VAIT*3 /ZERO/ JIHP BACK TO THE 

0 /DCXD IN STRUCTION 

POPPSV /THE COUNT 1S ZERO/ POP THE 

POPD /PSV AND RESISTER PAIR D 

RET /THEN RETURN VHEN THE COUNT IS ZERO 


dell’istruzione JNZ. Se si cercasse di eseguire la subroutine listata nell’E¬ 
sempio 2-20, T8080 effettuerebbe un salto alla locazione di memoria 003 
344 nel caso che il contenuto della coppia di registri DE, dopo il 
decremento, presentasse un valore diverso da zero. Anche se in questa 
locazione di memoria non è memorizzata alcuna istruzione, salterebbe 
indietro lo stesso ed eseguirebbe uno dei byte del dato dell’istruzione 
LXID come se si trattasse di un’istruzione! E ovvio che questo caso non 
deve assolutamente accadere. 

Come si può constatare dagli Esempi 2-19 e 2-20, gli scostamenti 
devono essere utilizzati con la massima attenzione. Si consiglia, nella 
pratica, di limitarne l’impiego più che possibile. Servendosi di essi, è 
spesso inevitabile commettere degli errori, mentre può risultare compli¬ 
cato ricordarsi di tutti i punti in cui vi sono scostamenti da cambiare via 
via che a (da) un programma o a (da) una sobroutine si aggiungano (si 
eliminano) delle istruzioni. Si osservi come, impiegando esclusivamente 
degli indirizzi simbolici anziché indirizzi simbolici con scostamento 
positivo o negativo, il compito di determinare il corretto indirizzo per le 
istruzioni a tre byte sia affidato tutto all’assembler. Si ricordi che il 
motivo principale per cui si ricorre ad un assembler è proprio quello di 
sollevare il programmatore dai compiti più monotoni, dove è facile 
sbagliare. 

Come si è già accennato, lo scostamento può anche essere sottratto 
all’indirizzo simbolico. A questo scopo, invece del carattere più (♦), si usa 
quello meno (—). L’Esempio 2-21 contiene il listing di una subroutine 
che si vale di uno scostamento da sottrarre ad un indirizzo simbolico e 
l’esempio 2-22 riporta la versione assemblata della stessa subroutine. 

Nell’Esempio 2-21 il programmatore ha stabilito che, nel caso che il 
carattere letto da una tabella sia minore del carattere ASCII A, l’8080 
debba effettuare un salto indietro all’istruzione M VIA. Invece di valersi 
di un altro indirizzo simbolico, si è deciso che sarebbe stato altrettanto 
comodo sottrarre due dall’indirizzo di 16 bit assegnato all’indirizzo 
simbolico LOOP. Allorché si provvede ad assemblare questa subroutine 
(Esempio 2-22), l’indirizzo al quale è memorizzata l’istruzione MVIA 
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Esempio 2-21. Sottrazione di uno scostamento da un indirizzo simbolico. 


c-l 




000 1 
0002 


DV SRCH 

037 146 

0003 


•007 375 

0004 

FIN DI T* 

MVIB 

/LOAD THE B REGI STER VITH 

0003 


003 

/THE TERMINATION CHARACTER 

0006 


NVIA 

/LOAD THE A REGI STER VITH THE 

0007 


060 

/TABLE TERMINATOR 

0008 

LOOP* 

CALL 

/ EX AM IN E Ptì ENTRY IN THE TABLE 

0009 


SRCH 


0010 


0 


0011 


CPI 

/FIND AN ASCII A ? 

0012 


•A" 


0013 


JC 

/NO* LESS THAN A* KEEP LOOK IN G 

0014 


LOOP-2 


0015 


0 


0016 


JNZ 

/NO* EQUAL TO A* KEEP LOOK INO 

0017 


LOOP 


00IS 


0 


0019 

0020 


HLT 

/FOUND IT* HALT. 


risulta essere di due locazioni rispetto all’indirizzo di memoria dove è 
memorizzata l’istruzione CALL. Nell’Esempio 2-22 è possibile consta¬ 
tare come TEA abbia generato il corretto indirizzo di memoria per 
l’istruzione JC, e, in particolare, come dall’indirizzo di 16 bit di LOOP 
sia sottratto lo scostamento (di 8 bit). Quest’ultima circostanza è facile 
da verificare in quanto all’indirizzo simbolico LOOP è assegnato l’indi¬ 
rizzo 010 001 e, sottraendo due da esso si ottiene come risultato 007 377, 
utilizzato appunto come secondo e terzo byte dell’istruzione JC. 

Indipendentemente dal fatto di aggiungere un numero ad un indirizzo 
simbolico oppure di sottrarlo da esso, occorre andar molto cauti nell’im¬ 
piego degli scostamenti. Questo riveste particolare importanza dopo che 
un programma è stato editato in quanto può accadere che gli scosta¬ 
menti debbano essere cambiati. Si ricordi che lo scostamento può essere 
compreso tra 000 e 377 ossia tra 00 ed FF. Benché, a prima vista, questa 
possa apparire come una limitazione, vi è da considerare che è assai 
improbabile che un programmatore si trovi ad aver bisogno di uno 
scostamento maggiore di 377 o FF, data l’estrema difficoltà di un calcolo 

Esemplo 2-22. Assemblaggio di un programma contenente uno scostamento 
che è sottratto da un Indirizzo simbolico. 

DW SRCH 037 146 


•007 375 


007 

37 5 

006 

FIN DIT* 

N VI B 

/LOAD THE B REGI STER VITH 

007 

376 

003 


003 

/THE TERHINATION CHARACTER 

007 

377 

076 


MVIA 

/LOAD THE A REGI STER VITH THE 

010 

000 

060 


060 

/TABLE TEHUNATOR 

010 

001 

315 

LOOP* 

CALL 

/ EX AM IH E AN ENTRY IH THE TABLE 

010 

002 

146 


SRCH 


010 

003 

0 37 


0 


010 

004 

37 6 


CPI 

/FINO AN ASCII A 7 

010 

005 

101 


"A" 


010 

006 

332 


JC 

/NO. LESS THAN A. XEEP LOOK IN G 

010 

007 

377 


L00P-2 


010 

010 

007 


0 


010 

011 

302 


JNZ 

/NO. EQUAL TO A. KEEP LOOK IN G 

010 

012 

001 


LOOP 


010 

013 

010 


0 


010 

014 

166 


HLT 

/FOIMD IT. HALT. 
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del genere. Per gli scostamenti si possono usare sia numeri ottali che 
esadecimali; in questo secondo caso è obbligatorio memorizzare una H 
terminale. 

Nell’Esempio 2-21, perciò, si sarebbe potuto utilizzare uno02esadeci- 
male, ma la linea 14 avrebbe dovuto essere tramutata in LOOP-02H. 

Virgolette 

Come si è già detto nel corso di questo capitolo, TEA può generare il 
valore ASCII corrispondente ad un carattere tra virgolette, nel caso che 
questo sia il byte di dato immediato di un’istruzione immediata matema¬ 
tica, logica o di spostamento. I caratteri tra virgolette non possono, 
tuttavia, essere impiegati come secondo byte nelle istruzioni di I/O (IN e 
OUT). L’editor incorporato in TEA ignora tutti i caratteri di controllo 
diversi da CTRL/C, CTRL/S, CTRL/E, CTRL/I o CTRL/TAB. È 
dunque impossibile includere tra virgolette un carattere di controllo allo 
scopo di utilizzarlo come byte di dato immediato. 

Avendo necessità di utilizzare come tale il valore corrispondente ad un 
carattere di controllo, si può ricorrere alla pseudo-op DB unitamente ad 
una conveniente stringa di caratteri ed al codice ASCII corrispondente a 
quel carattere di controllo. Se, ad esempio, occorre procedere al con¬ 
fronto con CTRL/F di tutti i caratteri provenienti da una tastiera di 
telescrivente o di un CRT, si può aggiungere la linea di testo DB CTRL 
006 all’inizio del programma. La stringa CTRLF può in tal modo essere 
utilizzata come byte di dato immediato per un’istruzione CPI. 

Barra (/) 

Al principio di ogni commento deve essere riportata una barra (/). 
Della presenza di tale barra all’inizio di ogni commento si sono già 
incontrati svariati esempi. Al posto della (/) molti assembler si servono 
del punto e virgola (;). 

Virgola (,) 

Al termine di ogni indirizzo simbolico definito nel campo delle eti¬ 
chette bisogna far uso di una virgola. Anche a questo proposito dell'im- 
piego della virgola si sono già incontrati molti esempi relativi ad indirizzi 
simbolici definiti. Si noti che, allorché un indirizzo simbolico o una 
stringa di caratteri sono definiti mediante la pseudo-op DW, la virgola 
non deve mai essere usata. 

ASSEMBLAGGIO DEI PROGRAMMI 

Come si è già detto nel Capitolo 1, con l’introduzione del comando X 
(ASSEMBLE) si ottiene che TEA cominci l’esecuzione dell’assembler. 
La prima informazione fornita dall’utente nel corso di questo procedi- 
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mento riguarda il tipo di numeri, ottale o esadecimale, che sarà impie¬ 
gato nella stampa del listing. Dato che i programmi da assemblare 
possono essere memorizzati interamente in memoria oppure essere deri¬ 
vati da una banda perforata, TEA pone la domanda “M OR T?”. A 
seconda di dove si trovano i programmi da assemblare, l’utente rispon¬ 
derà con M (il programma da assemblare è memorizzato in memoria) 
oppure con T (il programma da assemblare una linea alla volta è 
memorizzato su banda perforata). TEA porrà a questo punto un’altra 
domanda, “AUTO-LOAD?”, prima di iniziare il procedimento di 
assemblaggio. La risposta a questa domanda può essere tanto N (NO) 
quanto Y (YES), a seconda che l’utente desideri o meno che TEA 
memorizzi in memoria il programma assemblato mano a mano che /’ assem¬ 
bler effettua la seconda passata attraverso il programma sorgente. Nel 
caso che la risposta sia N, il programma assemblato (versione oggetto) 
non sarà memorizzato in memoria nel corso del procedimento di assem¬ 
blaggio, ma sarà semplicemente posto in uscita verso il dispositivo IOP 
(perforatore di banda, registratore a cassette, ecc.). Nel caso che la 
risposta sia Y (YES), il programma oggetto sarà memorizzato in memo¬ 
ria nel corso della seconda passata dell’assembler e, contemporanea¬ 
mente, sarà anche posto in uscita verso il dispositivo IOP. 

L’Esempio 2-23 dà un’idea di come si svolga questo ‘dialogo’ iniziale 
con TEA. Dopo avere introdotto nel buffer del testo un breve pro¬ 
gramma, si introduce il comando X (ASSEMBLE). In risposta a ciò 
TEA stampa OCTAL, comunicando in tal modo che il listing della terza 
passata avverrà con numeri ottali. TEA chiede a questo punto dove è 
memorizzato il programma sorgente da assemblare e l’utente risponde 
con M poiché il programma è interamente contenuto in memoria. La 
risposta all’ultima domanda “AUTO-LOAD?”, stabilirà se, nel corso 
della seconda passata dell’assembler, la versione oggetto del programma 
dovrà essere memorizzata o meno in memoria. Indipendentemente dalla 
risposta, la versione oggetto del programma sarà comunque posta in uscita 
verso il dispositivo IOP (perforatore di banda, registratore a cassette, ecc.). 
Poiché la risposta dell’utente è N, la versione oggetto del programma 
non sarà memorizzata in memoria nel corso del procedimento di assem¬ 
blaggio. 

Una volta fornita la risposta alla seconda domanda, TEA comincia il 
procedimento di assemblaggio. Nel corso della prima passata, TEA 
“costruisce” la tabella dei simboli degli indirizzi e, dal momento che 
durante questa operazione non si sono verificati errori, risponde con 
“ERRORS DETECTED = 000” (errori rilevati = 0) al termine della 
prima passata. Si procede allora ad effettuare la seconda passata e si 
pone in uscita verso il dispositivo IOP la versione oggetto del pro¬ 
gramma sorgente, senza che, contemporaneamente, essa sia memoriz¬ 
zata in memoria. 

Per la seconda volta, non avendo rilevato errori nel corso del procedi¬ 
mento di assemblaggio, TEA stampa “ERRORS DETECTED = 000”. 

Nel corso della terza passata conclusiva attraverso il programma 
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Esemplo 2-23. Assemblaggio di un programma. 


0001 *0A0 000 

0002 START. JMP /THIS IS THE ASSEMbLLP 

0003 START /bEMO.J STRATI UN PROGRAM. 

OOOA 0 

0005 1 

C»X 

OCTAL 

M OR T ? M 

Al'TO-LOAb ?N 

EJIRORS LtLTECTELl ■ 000 

• • 

IRRORS btTECTEb = 000 


TYCHON Ebl TOP-ASSEMbL EP U-3 


PAGE 01-001 


OAO 000 303 START. 
040 001 000 
040 002 040 


•040 000 

JMP /THIS IS THE ASSEMbLER 
START /bLMON STRATIOM PROGRAM. 
0 


TYCHON EblTOR-ASSEMbLER V-3 


PAGE 01-002 


START *040 000 
ERRORS DLTECTEb = 000 


o 

sorgente memorizzato in memoria, TEA provvede a stampare un listing 

del programma assemblato. Quindi stampa sei lineette (-), seguite 

dal nome dell’editor-assembler, il numero della versione e il numero 
della pagina. Poiché trattasi della prima pagina del listing e il pro¬ 
gramma assemblato si trovava in memoria, TEA stampa un numero di 
blocco pari a 01, seguito dal numero di pagina 001. Segue l’elenco del 
programma sorgente insieme al necessario corredo di indirizzi ed infor¬ 
mazioni relative ai dati. Giungendo al termine del programma sorgente, 
TEA realizza tanti ritorni di carrello e avanzamenti di linea quanti 
occorrono al completamento della pagina. Sono quindi stampate una 
seconda volta le lineette, il nome ed il numero della versione, unitamente 
al numero della pagina immediatamente consecutiva, 01-002. Poiché 
l’assemblaggio dell’intero programma è terminato, TEA stampa il con¬ 
tenuto ordinato della tabella dei simboli degli indirizzi. Poiché in questo 
programma è stato impiegato un unico indirizzo simbolico, la tabella dei 
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simboli ne contiene solamente uno, START, al quale TEA ha assegnato 
l’indirizzo 040 000 nel corso della prima passata. Una volta stampati 
tutti gli indirizzi simbolici, con i valori assegnati a ciascuno di essi, TEA 
stampa il numero degli errori che sono stati rilevati nel corso della terza 
passata. Come si può constatare, non si è incontrato nessun errore. Di 
nuovo, TEA provvede a realizzare un numero di ritorni di carrello e di 
avanzamenti di linea sufficienti a completare la pagina, tornando poi ai 
modo di comando. 

11 ritorno al modo di comando fa sì che la correzione degli errori con 
l’impiego dell’editor sia particolarmente agevole nel caso che l’assem¬ 
blaggio del programma avvenga da memoria (M). Nel caso invece che gli 
errori si siano manifestati mentre il programma sorgente era assemblato 
da banda (T), anziché da memoria (M), l’impiego dell’editor è pur 
sempre di aiuto nella loro correzione anche se la procedura risulta così 
un pò più complicata. 

In qualunque momento, mentre TEA è occupato a stampare le infor¬ 
mazioni del caso sul dispositivo 100 (la stampante della telescrivente o lo 
schermo del CRT), si può introdurre un CTRL/C per porre fine al 
procedimento di assemblaggio facendo sì che TEA ritorni al modo di 
comando. Se ne deduce che, nel corso del procedimento di assemblaggio 
interviene un qualche errore, per procedere alla sua correzione non è 
necessario attendere il completamento del listing della terza passata. 

In un’altra sezione di questo capitolo si avrà ancora l’occasione per 
trattare nei particolari il procedimento di assemblaggio. Ciò che 
importa, per il momento, è di rendersi conto che, all’inizio di questo 
procedimento TEA formula delle domande e che le risposte a queste 
domande hanno un effetto ben preciso su quanto avviene in seguito. Ora 
che si è esaminato il procedimento di assemblaggio, si possono passare in 
rassegna gli errori che TEA è in grado di rilevare in fase di assemblaggio 
nonché le modalità con cui TEA li segnala. 


ERRORI DI ASSEMBLAGGIO 

Nel corso del processo di assemblaggio, TEA comunica all’utente tutti 
i casi in cui esso non riesce a interpretare una particolare sequenza di 
caratteri. Per esempio, i simboli di istruzione MOVABC, LXIE, 
PUSHC, JUMP, CALLIT ed RE non sono validi in quanto nessuno di 
essi rappresenta una qualche istruzione eseguibile dall’8080 o dall’8085. 
Se, dunque, TEA s’imbat,te nel corso del programma in uno di questi 
simboli o in qualunque altro simbolo di istruzione non valido, esso deve 
darne notizia, anzi, non deve limitarsi a riferire che si sia verificato un 
errore, ma deve anche far sapere di che tipo di errore si è trattato e dove 
esso si è verificato. Se, infatti, TEA riferisse all’utente che, in fase di 
manipolazione di un programma consistente in 1100 linee di testo, sono 
stati trovati tre errori, questi si troverebbe in grave difficoltà, e perde¬ 
rebbe comunque molto tempo, per localizzare tali errori. Nel caso, 
invece, che TEA riferisca che gli errori si trovano alla linee 345, 678, e 
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705, sarà assai facilitato per il programmatore il compito di localizzare 
gli errori e, come è augurabile, di correggerli. 

Purtroppo l’unica specie di errori che TEA può rilevare è quella degli 
errori di sintassi. È questo il nome degli errori che si commettono 
allorché le linee di testo non corrispondono al formato descritto al 
principio di questo capitolo o quando si utilizzano dei simboli di istru¬ 
zione non validi, come quelli del paragrafo precedente, se un indirizzo 
simbolico è definito due volte, se si usa una sola virgoletta in un byte di 
dato immediato oppure se si utilizza in un programma un numero come 
19E, in tutti questi casi TEA provvede a stampare un messaggio di 
errore. Un tipo differente di errore che TEA non è in grado di rilevare è un 
errore di natura logica, se, ad esempio, il programmatore utilizza in una 
subroutine i registri sbagliati, carica e preleva dallo stack i registri 
nell’ordine sbagliato o punta con lo stack pointer ad un indirizzo di 
memoria inesistente, TEA non genera nessun messaggio di errore. 

Le specie di errori previsti da TEA sono due: errori fatali ed errori 
non-fatali. TEA può rilevare tre tipi di errori fatali e cinque di errori 
non-fatali. La scoperta di un errore fatale fa si che TEA provveda a 
stampare un messaggio di errore, ritornando subito dopo al modo di 
comando, senza insistere nell’esecuzione dell’assemblaggio del pro¬ 
gramma. Questo dipende dal fatto che l’errore è tanto grave da impedire 
a TEA di proseguire nel procedimento di assemblaggio senza commet¬ 
tere a sua volta degli errori. Nel caso invece, che TEA rilevi un errore 
non-fatale, si ha la generazione di un messaggio di errore, senza che, per 
questo, TEA interrompa il procedimento di assemblaggio. Indipenden¬ 
temente dalla specie di errore che ha avuto luogo, se mai ve ne è stato 
uno, non si deve assolutamente cercare di eseguire la versione oggetto (la 
versione assemblata) del programma. Questo programma oggetto può 
essere memorizzato su di un dispostivo periferico (perforatore di banda 
o registratore a cassette) oppure può essere già stato caricato automati¬ 
camente in memoria nel corso della seconda passata dell’assembler. 


Messaggi di Errore 

TEA provvede a stampare messaggi di errore nel corso sia della prima, 
sia della seconda, sia della terza passata del procedimento di assemblag¬ 
gio, in tutti i casi in cui non sia in grado di interpretare una linea di testo o 
che esista una qualche ambiguità. Allorché ha luogo un errore, TEA 
provvede a stampare un messaggio di errore sul dispositivo IOO (la 
stampante della telescrivente o lo schermo del CRT) insieme al numero 
del blocco ed al numero della linea dove l’errore si è presentato. Assem¬ 
blando un programma proveniente dalla memoria, il numero di blocco 
del messaggio di errore è invariabilmente 01. Assemblando invece il 
programma da banda perforata, il numero di blocco nei messaggi di 
errore è compreso tra 01 e 99, a seconda del numero dei blocchi già 
passati in rassegna dall’assembler al momento in cui ci si è imbattuti 
nell’errore. 
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Utilizzando come dispositivo di I/O per TEA una telescrivente con un 
lettore/perforatore di banda, il messaggio di errore risulta stampato 
sulla stampante. Comunque, nel corso della seconda passata, la versione 
assemblata del programma è pure perforata su banda. 

Ne consegue che, se nel corso della seconda passata si incontrano degli 
errori, i messaggi di errore sono stampati sulla stampante nonché perfo¬ 
rati sulla banda. Il modulo oggetto così perforato, perciò, è del tutto 
inservibile in quanto proprio in mezzo ai valori dei dati sono perforati 
dei messaggi di errore. 

Esemplo 2-24. Doppia definizione di un Indirizzo simbolico all'Interno del 

programma. 


OL 


000 1 


•000 000 

0002 

START* 

CALL 

/VAIT FOR THE C REGI STER 

0003 

0004 


LOOPIT 

0 

/TO BE DECREMENTED TO ZERO 

0005 

0006 


HLT 

/THEN HALT 

0007 

LOOPIT* 

DCRC 

/DECREMENT THE COUNT 

0008 


JNZ 

/LOOP BACK IF THE COUNT 

0009 

0010 


LOOPIT 

0 

/IS NON-ZERO 

0011 

0012 


RET 

/VHEN IT IS ZERO* RETURN 

0013 

0014 

LOOPIT* 

XRAA 

RET 

/SET THE A REGI STER TO ZERO 


0015 
C-X 
OC TAL 

M OR T ? M 
AUTO-LOAD ?N 

REDEF AT LINE # 01-0013 
ERRORS DETECTED • 001 
ERRORS DETECTED - 000 


TYCHON EDITOR-ASSEMBLER V-3 


PAGE 01-001 


*000 0 


000 

000 

315 

START* 

CALL 

000 

001 

004 


LOOPIT 

000 

002 

000 


0 

000 

003 

166 


HLT 

000 

004 

015 

LOOPIT* 

DCRC 

000 

005 

302 


JNZ 

000 

006 

004 


LOOPIT 

000 

0 07 

000 


0 

000 

010 

311 


RET * 

000 

011 

257 

LOOPIT* 

XRAA 

000 

0 12 

311 


RET 


/VAIT FOR THE C REGI STER 
/TO BE DECREWENTED TO ZERO 

/THEN HALT 

/DECREMENT THE COUNT 
/LOOP BACK IF THE COUNT 
/IS NON-ZERO 

/VHEN IT IS ZERO* RETURN 
/SET THE A REGI STER TO ZERO 


TYCHON EDITOR-ASSEMBLER V-3 


PAGE SI-SS2 


LOOP1T «000 004 START -000 000 
ERRORS DETECTED - 000 
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Doppia Definizione di un Indirizzo Simbolico (REDEF) 

Benché non sia stato esplicitamente detto, una stringa di caratteri può 
essere utilizzata una volta sola per definire un indirizzo simbolico. Nel 
caso che la stessa stringa di caratteri sia utilizzata due o più volte, TEA 
provvede a stampare un messaggio di errore “REDEF AT LINE # 
xx-nnnn”, dove xx rappresenta il numero del blocco ed nnnn quello della 
linea di testo contenente la stringa di caratteri che è stata definita una 
volta di troppo. 

Nell’Esempio 2-24 si può constatare come il programma contenga due 
indirizzi simbolici definiti in modo identico. Dopo la risposta alle due 
domande “M OR T?” e “AUTO-LOAD?”,TEA inizia la prima passata, 
nel corso della quale costruisce la tabella dei simboli degli indirizzi e 
stampa il messaggio di errore REDEF AT LINE # 01-0013. TEA 
provvede quindi a completare la prima passata e stampa “ERRORS 
DETECTED = 001”. Si effettua quindi la seconda passata. Comesi può 
constatare, questo tipo di definizione ripetuta non può essere rilevata nè 
nel corso della seconda nè della terza passata, per cui TEA perfora su 
banda la versione oggetto del programma e poi informa l’utente che nel 
corso della seconda passata non è stato rilevato alcun errore. 

Il listing del programma assemblato che segue avviene mentre TEA 
completa la terza passata attraverso il programma sorgente. Anche qui, 
le definizioni ripetute degli indirizzi simbolici non possono essere rile¬ 
vate, per cui TEA provvede a listare l’intero programma assemblato 
stampando al termine il contenuto della tabella dei simboli degli indirizzi 
alla pagina 01-002. Anche nel corso di questa passata non è rilevato 
nessun errore per definizione ripetuta. 

Si osservi come, nonostante gli indirizzi simbolici definiti con LOO- 
PIT siano due, TEA si valga dell’indirizzo corrispondente alla prima 
presenza della stringa anche nel resto del programma. Allorché, nel 
corso della seconda passata, avviene la perforazione della banda, dopo i 
codici operativi delle istruzioni CALL e JNZ risulta perforato su banda 
l’indirizzo 000 004. Sempre l’indirizzo 000 004 risulta elencato nella 
tabella degli indirizzi simbolici (pagina 01-002) dopo la stringa LOOPIT. 
Ciò che conta è che, definendo un indirizzo simbolico due o più volte nel 
“corpo” dello stesso programma, l’indirizzo poi utilizzato nella banda 
perforata, nei listing del programma assemblato e nella tabella dei 
simboli degli indirizzi sarà quello relativo alla prima comparsa. 

Dopo aver stampato il contenuto della tabella dei simboli degli indi¬ 
rizzi al termine della terza passata, TEA fa ritorno al modo di comando. 
Dal momento che il programma che è stato assemblato è memorizzato 
interamente in memoria, l’editor può a questo punto essere utilizzato per 
eliminare o cambiare la seconda stringa LOOPIT. Il programma può 
quindi essere assemblato di nuovo con il risultato di ottenere un pro¬ 
gramma oggetto esente da errori. 

Nell’Esempio 2-25 si verifica un errore REDEF dovuto al fatto che la 
stessa stringa di caratteri è stata utilizzata nel programma due volte: una 
volta con la pseudo-op DW (definisci la parola) ed una seconda volta 
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Esemplo 2-25. Definizione ripetuta di un Indirizzo simbolico con la pseudo-op 

DW. 


ol 

0001 DV LOOPIT 123 345 

0002 

0003 *042 341 

0004 LOOPIT» DCRC /DECREMENT THE COINT 
0005 JNE /LOOP BACK IF THE COINT 

0006 LOOPIT /IS NON-ZERO 

0007 0 

0008 RET /VHEN IT 1S ZERO» RETURM 

0009 

OX 

OCTAL 

M OR T 7 M 

Al'TO-LOAD ?N 

ERRORS DETECTED • 000 

REDEF AT LINE « 0 1- 000 1 

ERRORS DETECTED • 001 


TYCHON EDITOR-ASSEHBLER V-3 PAGE 0 1-00 1 


DV LOOPIT 123 345 


042 341 015 
042 342 302 
042 343 341 
042 344 042 
042 345 31I 


•042 341 

LOOPIT» DCRC /DECREMENT THE COINT 

JNZ /LOOP BACK IF THE COINT 

LOOPIT /IS NON-ZERO 
0 

RET /VHEN IT IS ZERO» RETUIN 


TYCHON EDITOR-ASSEMBLER V-3 PAGE 01-002 

LOOPIT -042 341 
ERRORS DETECTED * 0 00 

come indirizzo simbolico definito. Come si può constatare questo ripe¬ 
tersi della definizione sfugge nel corso della prima passata dell’assem- 
bler. Il motivo di ciò è che qualunque stringa definita dalla pseudo-op 
D W è memorizzata nella tabella dei simboli degli indirizzi, unitamente al 
valore di 16 bit ad essa assegnata, nel corso della seconda passata. Di 
conseguenza questo tipo di definizione ripetuta può essere rilevata solo 
in occasione della seconda passata dell’assembler. 

Allorché ha termine l’esecuzione della prima passata, LOOPIT è 
memorizzato nella tabella dei simboli degli indirizzi insieme all’indirizzo 
042 341. Nel corso della seconda passata, la stringa loopit associata alla 
pseudo-op D W è confrontata con tutte le stringhe già memorizzate nella 
tabella dei simboli degli indirizzi per rilevare la presenza di eventuali 
definizioni ripetute. Dal momento che essa è già contenuta nella tabella, 
si ha la generazione di un messaggio di errore. E questa la ragione per cui 
il messaggio di errore risulta essere REDEF AT LINE #01-001 anziché 
REDEF AT LINE # 01-004. 

Come nei precedenti esempi di definizione ripetuta, il listing relativo 
alla terza passata non contiene nè errori nè messaggi di errore. Si osservi 
come l’indirizzo a 16 bit che compone il secondo e terzo byte dell’istru¬ 
zione JNZ non sia altro che l’indirizzo simbolico di LOOPIT definito nel 
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programma e non piuttosto, l’indirizzo assegnato in base alla pseudo-op 
DW. Questo stesso indirizzo si trova poi stampato alla pagina 01-002 in 
occasione della stampa del contenuto della tabella dei simboli degli 
indirizzi. 


Esempio 2-26. Numeri non validi che danno origine a messaggi di errore BN. 


OL 
008 1 
0002 
0003 

0004 BYTE3# 
0005 
0006 
0007 
0008 
0009 
0010 
0011 
0012 S 
0013 
>013 
? 


DV TTYIN 134 005 
•AFH00H 

CALL /GET A CHARACTER FROM THE 
TTYIN /TELETYPEVRI TER 'S KEYBOARD 

0 

CPI /I S THE A KEY PRESSED? 

009 

HVIA /LOAD THE A REGI STER VITH 
2H /2 (HEXADECIMAL) 

HLT 


C-X 

OCTAL 

H OR T ? M 

AUTO*LOAD ?N 

B* AT LINE # 0 1- 0003 


ERRORS DETECTED - 001 


BN AT LINE # 01-0003 
BN AT LINE # 0 1-0008 
Bi AT LINE # 01-0010 


ERRORS DETECTED - 003 


TYCHON EDITOR-ASSEMBLER V-3 PAGE 01-001 

DV TTYIN 134 005 


Bi AT LINE # 

01-0003 

•AFH00H 


000 000 315 

BYTE3* 

CALL 

/GET A CHARACTER FROM THE 

000 001 005 


TTYIN 

/TELETYPEVRI TER # S KEY BOARD 

000 002 134 


0 


000 003 376 


CPI 

/1S THE A KEY PRESSED? 

BN AT LINE # 
000 004 000 

01-0008 

0 09 


000 005 076 


M VI A 

/LOAD THE A REGI STER VITH 

Bi AT LINE # 
000 006 000 

01-0010 

2H 

/2 (HEXADECIMAL) 

000 007 166 


HLT 



TYCHON EDI TOR-ASSEMBLER V-3 PAGE I1-SS8 


BTTE3 -000 000 TTYIN -134 005 
ERRORS DETECTED - 003 
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Numeri Errati o Non Validi (Bad Numera: BN) 

Un altro tipo di messaggio di errore è stampato allorché TEA si 
attende un numero ottale oppure esadecimale e non trova nè l’uno nè 
l’altro. I numeri 097, 0A e 008, per esempio, non sono numeri ottali 
validi così come non sono numeri esadecimali validi i numeri 377, G9 e 
HH. L’esempio 2-26 include alcuni numeri non validi che TEA incontra 
nel corso della prima, seconda e terza passata dell’assembler. 

Nel corso della prima passata, mentre procede alla compilazione della 
tabella dei simboli degli indirizzi, TEA scopre che l’indirizzo *AFH00H 
non è valido. E chiaro, come già si è detto, che tra il primo ed il secondo 
byte esadecimale dovrebbe esservi uno spazio libero. Dal momento che 
TEA non controlla, nel corso di questa prima passata, la validità dei 
simboli delle istruzioni, è questo l’unico errore scoperto. Allorché pro¬ 
cede ad eseguire la seconda passata attraverso il programma sorgente, 
TEA scopre la non validità dello stesso indirizzo, insieme a quella del 
byte di dato immediato dell’istruzione CPI, poiché 009 non è un numero 
ottale valido. TEA conclude inoltre che il byte di dato immediato 
dell’istruzione MVIA, 2H, non è un numero valido nè ottale nè esadeci¬ 
male. 

L’unica differenza tra la seconda e la terza passata consiste nel fatto 
che TEA, nel corso della seconda passata, perfora sui banda un pro¬ 
gramma oggetto mentre; nel corso della terza, provvede a stampare il 
listing del programma assemblato. Il processo di assemblaggio non 
cambia minimamente. Ne consegue che, nel corso della terza passata, 
sono rivelati gli stessi tre errori. Si osservi anche come, al termine di 
ciascuna passata, sia stampato il messaggio “ERRORS DETECTED”. 
Anche se sono stati rilevati, in totale, “sette” errori, il numero degli 
errori contenuto nel programma è di tre soltanto. 

Mancata Inclusione dello Zero (NZ) 

Come già si è avuto accasione di ricordare nelle sezioni precedenti di 
questo capitolo, il secondo e terzo byte di un’istruzione a tre byte 
possono consistere sia in numeri ottali o esadecimali, sia in un indirizzo 
simbolico, sia in una stringa definita mediante la pseudo-op DW. Ricor¬ 
rendo ad un indirizzo simbolico o ad una stringa definita mediante la 
pseudo-op DW, la linea di testo immediatamente successiva al simbolo 
di istruzione deve contenere la stringa di caratteri, mentre la terza linea 
di testo deve contenere uno zero. La presenza dello zero è necessaria per 
“lasciare spazio” a TEA che deve inserire gli otto bit più significativi del 
codice dell’indirizzo o del dato. 

Nell’Esempio 2-27, dopo l’indirizzo simbolico dell’istruzione JNZ è 
stato dimenticato lo zero. In fase di assemblaggio del programma ripor¬ 
tato nell’Esempio 2-27, la scoperta di tale errore avviene sia nel corso 
della seconda che della terza passata. Si vede immediatamente in quale 
punto del listing del programma assemblato avrebbe dovuto essere 
posto lo zero. Il formato corretto dell’istruzione JNZ è, chiaramente, 
JNZ 
LOOPIT 
0 
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Esemplo 2-27. Mancanza di uno zero dopo l'Indirizzo simbolico. 


C-L 

oooi 

0002 LOOPIT* 
0003 
0004 
0005 
0006 
0007 
0006 
0009 
OX 
OC TAL 

M OR T 7 M 


•042 341 

OCRC / DECREMENT THE COUNT 

JMZ /LOOP BACX IT THE COUNT 

LOOPIT /IS NON-ZERO 

JMP /THE COINT IS ZERO* SO 

100 AIUHP TO 043 100 (KEXADECIHAL 

23H /2340). 


AUTO-LOAD 7N 

ERRORS DETECTED - 000 


NZ AT LINE # 0 1- 0005 


ERRORS DETECTED - 001 


TYCHON EDITOR-ASSEMBLER V-3 


PAGE 01-001 


•042 341 


042 

341 

015 

LOOPIT# 

DCRC 

/DECREMENT THE COUNT 

042 

342 

302 


JNZ 

/LOOP BACK IF 

THE COUNT 

042 

343 

341 


LOOPIT 

/IS NON-ZERO 


NZ AT LINE # 

01-0005 




042 

344 

303 


JMP 

/THE COUNT IS 

ZERO# SO 

042 

345 

100 


100 

/JUMP TO 043 

100 (HEXADECIMAL 

042 

346 

043 


23H 

/2340)• 



TYCHON EDITOR-ASSEMBLER V-3 PAGE 01-002 

LOOPIT >042 341 
ERRORS DETECTED - 001 

Dal momento che la seconda istruzione di salto (JMP) si vale di un 
numero ottale come secondo byte e di uno esadecimale come terzo byte, 
non è necessario nessuno zero. Questo è obbligatorio nelle istruzioni di 
tre byte solo nel caso in cui, come secondo byte dell’istruzione stessa, sia 
impiegato un indirizzo simbolico oppure una stringa definita mediante 
la pseudo-op DW. 

Superamento del Limiti di Memoria (memory exceeded (MEI)) 

Assemblando un programma memorizzato in memoria oppure su 
banda perforata, TEA procede a generare due tabelle: la tabella dei 
simboli degli indirizzi ed una seconda tabella contenente le stringhe ed i 
valori di otto bit assegnati alle stringhe in base alla pseudo-op DW. 
Questa seconda tabella ha il nome di tabella dei byte definiti. Per la 
memorizzazione di queste due tabelle è comunque necessario un ade¬ 
guato spazio di memoria. Lo spazio di memoria occorrente sarà per 
l’appunto determinato in base al numero degli indirizzi simbolici definiti 
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Esempio 2-28. Determinazione dello spazio di memoria a disposizione della 
tabella degli Indirizzi simbolici e di quella del byte definiti. 

INI TI AL ADDRESS 7 0S4S 000 
FINAL ADDRESS 7 0 077 377 
SOURCE CURRINTLY IN MEMORY 7 Y 
OO 

OSE 365 
077 377 

LINE » - 0179 

OH 

OO 

2A F5 

3 T FF 

LINE » * 0179 

O 

all’interno del programma e dal numero di pseudo op DB e DW utiliz¬ 
zate M'inizio del programma. 

La memoria di cui TEA si serve per queste due tabelle non fa parte 
della zona di memoria utilizzata dal text buffer, ma è interna ai limiti di 
memoria stabiliti dall’utente al momento di avviare TEA o di impiegare 
il comando M (MEMORY). 

Nell’Esempio 2-28 l’indirizzo iniziale è posto a 040 000 (2000 hex) e 
quello finale a 077 377 (3FFF hex). Poiché in memoria si trova già 
memorizzato un programma sorgente, la risposta alla terza domanda è 
Y (YES). Servendosi del comando Q, può essere determinata l’esten¬ 
sione della memoria utilizzata dal buffer del testo. Come si può consta¬ 
tare, il text buffer è memorizzato nelle locazioni di memoria comprese 
tra 040 000 sino a 052 365 (da 2000 a 2AF5 hex). Ne deriva che tutta la 
parte di memoria che si estende da 052 365 sino a 077 377 (da 2A F5 sino a 
3FFF hex) può essere utilizzata per la tabella dei simboli degli indirizzi e 
quella dei byte definiti. Essa è più che sufficente, dato che il programma 
consta di sole 178 linee di testo. 

Quanto è grande lo spazio di memoria occupato da ciascun elemento 
di una tabella? Per un indirizzo simbolico o una stringa definita in base 
alla pseudo-op DW, a ciascun elemento della tabella dei simboli degli 
indirizzi occorre un numero di locazione pari a quello dei caratteri 
contenuti nella stringa più altre tre locazioni di memoria. Ne consegue 
che, allorché si passa a definire LOOP1T mediante la pseudo-op DW, 
sono necessarie 6*3 (nove) locazioni di memoria per memorizzare i 
caratteri ASCII della stringa nonché il valore di 16 bit ad assa associato. 
La locazione di memoria addizionale serve a memorizzare il valore 075 
(3D hex), utilizzato come separatore della stringa dal valore di 16 bit. Per 
ogni stringa utilizzata in una pseudo-op DB, ogni carattere della stringa 
equivale ad una locazione di memoria; un’ulteriore locazione di memo¬ 
ria è necessaria a memorizzare il separatore 075 (3D hex); un’ultima 
locazione di memoria è poi necessaria per memorizzare il valore di 8 bit 
da assegnarsi insieme all’istruzione. Risulta dunque che in 1 K (1.024) 
locazioni di memoria R/W possono essere memorizzati 113 indirizzi 
simbolici di sei caratteri oppure stringhe definite mediante la pseudo-op 
DW. Nel caso di byte definiti, avendo a disposizione 1K di memoria 
R/W, possono essere memorizzate in memoria 128 stringhe di sei carat¬ 
teri insieme ai valori ad esse assegnati. 
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Nell’Esempio 2-28, perciò, la memoria disponibile è sufficiente a 
memorizzare centinaia di indirizzi simbolici, stringhe di caratteri relative 
^parole definite e stringhe di caratteri relative a byte definiti. 

Il messaggio di errore per superamento di memoria (ME!) si produce 
allorché, mentre TEA sta procedendo a compilare la tabella degli indi¬ 
rizzi simbolici oppure quella dei byte definiti, la memoria a disposizione 
non è più sufficiente a memorizzare le tabelle al completo. Per mettere in 
evidenza questa condizione di errore, si può far riferimento ad uno dei 
brevi esempi già considerati. 

Allorché, nell’Esempio 2-29, si è dato il via a TEA, al buffer del testo 
sono riservate 2K locazioni di memoria (da 040 000 a 050 000 ottale, da 
2000 a 2800 hex). Poiché in memoria è già presente un programma, si 

Esempio 2-29. Generazione di un messaggio di errore ME! In seguito al 
cambiamento del limiti in memoria. 

1NITIAL ADDRESS 7 0040 000 
FINAL ADDRESS 7 O0S0 000 
SOURCE CURRENTLY IN MEMORY » Y 
OL 

ooot 

0002 *042 341 

0003 LOOPIT» DCRC ZDECREMENT THE COINT 
0004 JNZ /LOOP BACH IF THE COUNT 

0005 LOOPIT /IS NON-ZERO 

0006 0 

0007 RET 

0008 
OB 

040 130 

oso ooo 

LINE » • 0008 

OX 

OCTAL 

H OR T 7 M 

AUTO-LOAD TN 

ERRORS DETECTED ■ 000 

ERRORS DETECTED • 000 


7 

OM 

INI TI AL ADDRESS 7 
FINAL ADDRESS 7 0040 154 
SOURCE CURRENTLY IN MEMORY 7 Y 
OL 
000 1 

0002 *042 341 

0003 LOOPIT. DCRC /DECREHENT THE COINT 
0004 JNZ /LOOP BACK IF THE COINT 

0005 LOOPIT /IS NON-ZERO 

0006 0 

0007 RET 

0008 

oa 

040 130 
040 154 

LINE # • 0008 

ox 

OCTAL 

M OR T 7 M 
AUTO-LOAD 7N 
NE AT LINE » 0 1-0003 
7 

o 
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introduce un Y ( YES) e quindi si effettua il listing del programma con la 
telescrivente. Si introduce poi il comando Q in modo da poter determi¬ 
nare il numero di locazioni in memoria utilizzate dal buffer nonché 
quello delle locazioni di memoria disponibili per le tabelle degli indirizzi 
simbolici e dei byte definiti. La memoria esistente è più che sufficente per 
la memorizzazione di queste tabelle, cosicché il programma è regolar¬ 
mente assemblato. Non appena ha inizio la terza passata, mentre TEA 
sta ancora stampando le lineette, si introduce un CTRL/C, riportando 
TEA nel modo di comando. Poiché non vi è stato il messaggio di errore 
ME!, si ha conferma che la memoria per le tabelle era più che sufficiente. 

Si introduce allora il comando M (MEMORY), utilizzando il mede¬ 
simo indirizzo iniziale di prima (040 000, 2000 hex). Si cambia invece 
l’indirizzo finale da 050 000 a 040 154 (da 2800 a 206C hex). Questo ha 
come conseguenza che le locazioni di memoria utilizzabili per le due 
tabelle che TEA deve generare si sono ridotte a quattro soltanto. Dopo 
che sono stati cambiati i limiti di memoria, si procede ad un listing del 
programma con lo scopo di accertarsi che esso sia ancora presente in 
memoria. A questo punto si procede ad assemblarlo. 

Nel corso della prima passata, TEA deve porre la stringa LOOPIT, 
uno 075 ed un indirizzo di 16 bit (042 341, 22E1 hex) nella tabella degli 
indirizzi simbolici. Per questo, tuttavia, occorre un numero di locazioni 
di memoria maggiore delle quattro “lasciate”, cosicché TEA stampa il 
messaggio di errore ME! ATLINE #01-003. Ciò corrisponde a ciò che si 
poteva prevedere, in quanto al momento in cui si manifesta l’errore TEA 
sta “elaborando” l’indirizzo simbolico LOOPIT. L’errore di memoria 
superata (ME!) corrisponde a quello che si dice un errore irrimediabile 
(in genere indicato come FATAL ERROR). Il significato di questo 
termine sta nel fatto che, nel caso che avvenga un tale genere di errore di 
assemblaggio, TEA arresta immediatamente il procedimento di assem¬ 
blaggio e ritorna al modo di comando, come si può constatare dall’e¬ 
same dell’ultima porzione dell’Esempio 2-29. Dopo la stampa del mes¬ 
saggio di errore ME! l’assembler si astiene dall’eseguire qualunque 
ulteriore passata a qualunque altra azione, limitandosi a tornare al 
modo di comando. Tutte le condizioni di errore descritte in precedenza 
sono rimediabili (non fatali); il procedimento di assemblaggio può prose¬ 
guire anche se vi è stata la scoperta di un errore. In seguito a questa 
circostanza, è possibile localizzare ulteriore errori presenti nel resto del 
programma. Altri tipi di errori non fatai e fatai saranno visti tra breve. 

Nel caso che si verifichi il messaggio di errore per memoria superata 
(ME!), le possibili soluzioni sono tre. Una di esse consiste nell’introdurre 
il comando M (MEMORY) ed aumentare l’estensione della memoria 
adibita al buffer del testo. Se la memoria R/W a disposizione è già stata 
tutta riservata al text buffer, si può provare a ridurre il numero degli 
indirizzi simbolici, delle parole e dei byte definiti sino a che il messaggio 
di errore ME! non si verifichi più. Se questo secondo sistema non è 
attuabile si può sempre assemblare il programma da banda perforata 
(oppure da un qualsiasi altro supporto dal quale il dispositivo IOR possa 
leggere una linea di testo per volta). Il metodo utilizzato per assemblare 
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programmi da banda perforata sarà descritto in un’altra sezione di 
questo stesso capitolo. 

In questo libro, si è precedentemente affermato che il text buffer abbia 
a sua disposizione la totalità della memoria riservata dall’utente nel 
corso del dialogo di inizializzazione con TEA oppure mediante il 
comando M (MEMORY). Si può osservare, giunti a questo punto, che 
ciò non sempre è vero. Se, infatti, si deve assemblare un programma 
memorizzato interamente in memoria, vi deve essere abbastanza memo¬ 
ria non utilizzata dal buffer affinchè TEA possa servirsene per la tabella 
dei simboli degli indirizzi e per quella dei byte definiti. Soltanto nel caso 
che ci si valga dell’editor di TEA per redigere un manoscritto, un modulo 
postale o qualche altro genere di informazione che poi TEA non debba 
assemblare, l’intero buffer può essere utilizzato per memorizzare del 
testo. 

Errori di Definizione (DE) 

Un errore di definizione ha luogo allorché si impiega la pseudo-op 
DW o quella DB in qualsiasi punto fuorché all’inizio di un programma. 
Come già accennato, queste pseudo-op devono essere utilizzate prima 
che nel programma compaia qualunque simbolo mnemonico di istru¬ 
zione, indirizzo simbolico definito o indirizzo definito (*). Nel caso che le 
pseudo-op DW o DB siano utilizzate in qualunque altro punto, compare 
un DE AT LINE # xx-nnnn. Poiché si tratta di un fatai error, TEA 
arresta le operazioni di assemblaggio e ritorna immediatamente al modo 
di comando. Nel caso che si verifichi questo genere di errore, le pseudo- 
op DW o DB responsabili devono essere spostate all’inizio del pro¬ 
gramma per permettere l’esecuzione dell’assemblaggio. 

Nell’esempio 2-30 compare in primo luogo il listing del programma da 
assemblare. Come si può constatare, la pseudo-op DW è utilizzata alla 
linea uno e quella DB alla linea nove e dieci posposta ad alcuni simboli di 
istruzione, a un indirizzo simbolico definito (START) e ad un indirizzo 
definito (*203 013). Si introduce quindi il comando X (ASSEMBLE), 
senza che nel corso della prima passata sia scoperto alcun errore. Nella 
seconda passata, tuttavia, TEA stampa il messaggio di errore DE AT 
LINE # 01-0009, a causa della linea che contine DB CR 015. Poiché si 
tratta di un fatai error, TEA ritorna immediatamente al modo di 
comando. In conseguenza di ciò, nel corso della seconda passata dell’as- 
sembler, sarà impossibile arrivare alla linea 10. 

Si cancellano allora le linee da 9 a 11 e si impiegano le pseudo-op DB 
alle linee due e tre per l’assegnazione di valori di 8 bit a CR ed LF. Tali 
modifiche risultano evidenti dal listing del programma. Si introduce, 
quindi, di nuovo il comando X (ASSEMBLE) e l’operazione di assem¬ 
blaggio può allora svolgersi senza errori, dal momento che tutte le 
pseudo-op DW e DB sono ora poste prima di tutti i simboli di istruzione, 
nonché di tutti gli indirizzi simbolici definiti e degli indirizzi definiti. Si 
badi che il procedimento di assemblaggio è stato bloccato alla fine della 
seconda passata, ma che, ad onta di ciò, si può star certi che l’eventuale 


88 



Esempio 2-30. Un errore di definizione (DE) causato dall’Impiego di due 
pseudo-op DB In un punto sbagliato del programma. 


0001 

0002 


DV TTYOUT 001 034 

0003 


•203 013 

0004 

START# 

CALL 

/PRINT A CARRIAGE RETURN AN D A 

0005 

0006 


CRLF 

0 

/LINE FEED ON THE TELETYPEVRI TER 

0007 

0008 


HLT 

/THEN HALT 

0009 


DB CR 

015 

ooto 

0011 


DB LF 

0AH 

0012 

CRLF# 

M VI A 

/LOAD THE A REGI STER VITH 

0013 


CR 

/THE ASCII VALUE FOR A 

0014 


CALL 

/CARRIAGE RETURN AND THEN 

0015 


TTYOUT 

/PRINT IT ON THE 

0016 


0 

/TELETYPEVRI TER 

0017 


M VI A 

/THEN LOAD THE A REGI STER VITH 

0018 


LF 

/THE ASCII VALUE FOR A LINE FEED 

0019 


JMP 

/AND PRINT IT ON THE 

0020 


TTYOUT 

/TELETYPEVRI TER 


0021 0 
0022 
0023 
OX 
OC TAL 

M OR T ? M 

AUTO-LOAD ?N 

ERRORS DETECTED - 000 

DE AT LINE # 0 1-0009 
7 

O D9- 11 


012 
0002 
0003 
0004 7 

OL 
000 1 
0002 
0003 
0004 
0005 

0006 START# 
0007 
0008 
0009 
00 M» 


DB CR 015 
DB LF 0AH 


DV TTYOUT 001 034 
DB CR 015 
DB LF 0AH 

•203 013 

CALL /PRINT A CARRIAGE RETUR4 AND A 

CRLF /LINE FEED ON THE TELETYPEVRI TER 
0 

HLT /THEN HALT 


0011 CRLF# 

M VI A 

0012 

CR 

0013 

CALL 

0014 

TTYOUT 

0015 

0 

0016 

N VI A 

0017 

LF 

0018 

JMP 

0019 

TTYOUT 

0020 

0 

0021 

0022 

OX 

OCTAL 

H OR T 7 N 

AUTO-LOAD ?N 

ERRORS DETECTED - 00C 


/LOAD THE A REGI STER VITH 
/THE ASCII VALUE FOR A 
/CARRIAGE RETURN AND THEN 
/PRINT IT ON THE 
/TELETYPEVRI TER 

/THEN LOAD THE A REGI STER VITH 
/THE ASCII VALUE FOR A LINE FEED 
/AND PRINT IT ON THE 
/TELETYPEVRI TER 


ERRORS DETECTED ■ 000 


O 
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terza passata, ma che, ad onta di ciò, si può star certi che l’eventuale terza 
passata non farebbe scoprire nessun errore, per il semplice motivo che 
tutti gli errori che si manifestano durante la terza passata sono gli stessi 
rivelati nel corso della seconda . 

Il programma dell'Esempio 2-30 potrebbe anche essere modificato in 
modo da far comparire la pseudo-op DW in un punto non adatto. 
L’insegnamento che se ne potrebbe trarre non aggiungerebbe però molto 
a quanto già si conosce, in quanto TEA genera un messaggio di errore 
DE nel corso della seconda passata dell’assembler tanto che sia la 
pseudo-op DB ad essere utilizzata in un punto non corretto quanto che si 
tratti della pseudo-op DW. 


No Address (NA) (assenza dell’indirizzo) 

Se mai ci si dimentica di definire almeno un indirizzo del programma, 
TEA genera il messaggio di errore NA AT LINE # nn-xxxx, signifi¬ 
cando così che non conosce quali indirizzi deve utilizzare per le varie 
linee di testo. 

Nell’Esempio 2-31 è compilata ed assemblata la subroutine di tre 
istruzioni. Al termine della prima passata, TEA stampa ERRORS 
DETECTED = 000 e comincia quindi ad eseguire la seconda passata 
attraverso il text buffer. Avendo trovato, tuttavia, un simbolo di istru- 

Esemplo 2-31. Messaggio di errore NA generato nel caso che In un 
programma non siano stati definiti gli indirizzi. 


OL 

000 1 LOOPIT» DCRC 
0002 JNZ 

0003 LOOPIT 

0004 0 

000S RET 

0006 
ox 

OC TAL 

M OR T ? Il 

Atrro-LOAD ?N 

ERRORS DETECTED - 000 

NA AT LINE # 0 1-000 1 
T 

OI 1 

0101 *010 000 

0002 ? 

OLI-3 

0001 *010 000 

0002 LOOPIT# DCRC 
0003 JNZ 

OX 
OCTAL 

H OR T 1 K 

AUTO-LOAD TN 

ERRORS DETECTED • 000 

ERRORS DETECTED - 0 00 


/DECREMEXT THE COUNT 
/LOOP BACK I F THE COUIT 
/IS NON-ZERO 


/DECREMENT THE COUNT 
/LOOP BACK ir THE COUNT 


1 

o 
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zione nella prima linea di testo non sa quale indirizzo debba essere 
associato al codice del simbolo. Si ricordi, a questo proposito, che, 
allorché si perfora su banda un programma oggetto, l’informazione 
relativa all’indirizzo deve sempre accompagnare i valori corrispondenti 
alle istruzioni e ai dati. Tale informazione sugli indirizzi deve essere 
sempre presente affinchè, rileggendo la banda perforata nel microcalco¬ 
latore, l’8080 possa determinare dove memorizzare il programma. 

Con la stampa del messaggio di errore NA AT LINE #01-0001, TEA 
segnala che occorre definire un indirizzo all’inizio della linea 0001. Nel 
caso che le prime due o tre linee del buffer del testo fossero commenti c la 
linea cinque contenesse il primo simbolo di istruzione, il messaggio di 
errore sarebbe NA AT LINE #01-0005 poiché ai commenti non sono 
assegnate locazioni di memoria, così come, d’altronde, essi non sono 
perforati sulla banda del programma oggetto o caricati in memoria nel 
caso in cui ci si serve della funzione di auto-caricamento. 

L’errore N A appartiene alla categoria degli errori fatali. TEA ritorna 
perciò al modo di comando subito dopo aver stampato il messaggio di 
errore. Comunque, nell’esempio 2-31, all’inizio della linea uno si inseri¬ 
sce (II!) un indirizzo definito. Allorché, dopo questa modifica, il pro¬ 
gramma è assemblato, non si manifestano più errori in quanto TEA è 
ora edotto su dove debbano essere memorizzati tutti i valori relativi alle 
istruzioni ed ai dati. 11 procedimento di assemblaggio è interrotto di 
nuovo al termine della seconda passata mediante l’introduzione di un 
CTRL/C. 


Overlap Error (OL) (errore di sovrapposizione) 

Il messaggio di errore di sovrapposizione (OL) si verifica soltanto nel 
caso che, avendo risposto Y (YES) alla domanda “AUTO-LOAD?”chc 
segue l’introduzione del comando X (ASSEMBLE), TEA scopra che le 
informazioni contenute nella memoria R/W andrebbero perdute qua¬ 
lora il codice di istruzione o di dato della linea di testo appena assem¬ 
blata fosse trascritto in memoria. 

Si supponga di assemblare la subroutine elencata nell’Esempio 2-31 e 
che la risposta alla domanda AUTO-LOAD? sia Y (YES). Se l’assem¬ 
blaggio del programma avviene senza errori supponendo che al buffer 
del testo sia già stato aggiunto l’indirizzo definito, la subroutine sarà 
caricata in memoria a partire da 010 000. Dopo che il programma è 
stato assemblato nel corso della seconda passata, si potrà, perciò, utiliz¬ 
zare un monitor di sistema o un debugger per esaminare un pò di 
locazioni di memoria cominciando così da quella 010 000. Nel caso si 
tratti di locazioni di memoria R/W, sarebbe lecito attendersi di trovare il 
codice corrispondente al simbolo DCRC (015 ottale, OD hex) seguito dal 
codice corrispondente al simbolo di istruzione JNZ, l’indirizzo di 16 bit 
di LOOPIT ed il codice corrispondente all’istruzione RET (302,000,010 
e 311 ottale, C2, 00, 08 e C9 hex). 

Caricando in memoria R/W dei codici di 8 bit nel corso della seconda 
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passata dell’assembler, occorre cautelarsi contro un errore tipico di 
questa procedura. Può darsi infatti che i valori relativi ai dati siano 
trascritti nelle locazioni di memoria R/W adibite alla memorizzazione 
del programma TEA, del text buffer, della tabella dei simboli degli 
indirizzi, di quella dei byte definiti o nelle locazioni riservate allo stack e 
ai dati temporanei. 

Per accertarsi che TEA od una qualsiasi di queste altre locazioni di 
memoria R/W non siano “intasati” dalla funzione di auto-caricamento, 
TEA confronta l’indirizzo al quale deve memorizzare il codice con: (1) il 
primo e l’ultimo indirizzo di memoria adibiti alla memorizzazione del 
programma TEA, (2) la prima ed ultima locazione di memoria utilizzata 
dallo stack o come memoria temporanea, (3) l’indirizzo iniziale del 
buffer del testo (fissato dall’utente) e l’ultimo indirizzo utilizzato dalla 
tabella dei simboli degli indirizzi (la tabella dei simboli degli indirizzi è 
“costruita” in memoria subito di seguito alle linee di testo del buffer; la 
tabella dei simboli degli indirizzi ed il testo possono essere considerati 
come costituenti una sezione continua di memoria utilizzata da TEA) e 
(4) la prima ed ultima locazione di memoria adibite alla tabella dei byte 
definiti. Quest’ultima tabella si trova al confine della memoria R/W 
disponibile; essa cresce verso il basso, a partire dall’indirizzo finale 
specificato dall’utente nel dialogo iniziale con TEA. Nel caso ci si 
preoccupi che la tabella dei byte definiti invada quella dei simboli degli 
indirizzi, e viceversa , TEA provvede a controllare che questo non 
accada. Altrimenti nel corso del procedimento di assemblaggio si ottiene 
un messaggio di errore ME!. 

In conclusione, prima di riporre in memoria R/W un qualunque 
valore, in base alla funzione di auto-caricamento di TEA nel corso della 
seconda passata del procedimento di assemblaggio, TEA effettua innan¬ 
zitutto un confronto di tutti questi indirizzi limite con l’indirizzo di 
memoria in corrispondenza del quale deve essere caricato il valore di 8 
bit. Nel caso che l’indirizzo di memoria sia compreso comunque entro 
questi indirizzi, TEA provvede a stampare il messaggio di errore OL, 
insieme al numero di linea in corrispondenza del quale si “è verificata” la 
sovrapposizione. In caso di errore di sovrapposizione, la funzione di 
auto-caricamento è disabilitata automaticamente, evitando così che 
insieme ad ogni linea del testo assemblato sia stampato un messaggio di 
errore OL. Naturalmente, se, in un momento successivo, si dà nuova¬ 
mente il. via al procedimento di assemblaggio, TEA ripete ancora la 
domanda “AUTO-LO AD?”, in modo che, se non vi è sovvrapposizione, 
il programma può essere caricato direttamente in memoria nel corso 
della seconda passata dell’assembler. E naturale che, prima, si deve 
cambiare un indirizzo definito (*) in modo che tale errore non si verifichi 
più. 

L’Esempio 2-32 riporta un breve programma che è stato caricato 
automaticamente in memoria nel corso della seconda passata. Come 
prima cosa si effettua il listing del programma. Si introduce poi il 
comando Q (QUERY) per scoprire quali siano le sezioni di memoria 
utilizzate e quali quelle a disposizione per la memorizzazione del pro- 
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Esemplo 2-32. Caricamento automatico In memoria di una versione oggetto 
del programma assemblato nel corso della seconda passata dell'assembler. 


OL 

0001 «SS* 080 

0002 LOOPIT, DCRC 


0003 
0004 
0005 
0006 
0007 

oa 

040 2 0 6 
077 377 
LINE * < 

>X 
OC TAL 

H OR T 7 H 
AUTO-LOAD »Y 
ERRORS DETECTED 


JMZ 

LOOPIT 

0 

RET 


0007 


000 


/ DECREM EN T THE COLNT 
/JLMP BACK IT THE COINT 
/IS NON-ZERO 

/RETURN VHEN THE CO HOT IS ZERO 


ERRORS DETECTED - 000 


TYCHON EDITOR-ASSEMBLER V-3 PAGE 01-00 1 


•050 000 


oso 

000 

015 

LOOPIT# DCRC 

/DECREM ENT THE COINT 

oso 

001 

302 

JNZ 

/JUMP BACK IP THE COINT 

050 

002 

000 

LOOPIT 

/IS NON-ZERO 

OSO 

oso 

003 

004 

0 50 
311 

0 

RET 

/RETU7N VHEN THE COINT IS ZERO 


i 

oz 

IN TER A COMM AND» THEN A CR. 

COMHAND • DBUG 

7 

OSO 000 / 015 
050 001 / 302 
050 002 / 000 
OSO 003 / 050 
050 004 / 311 

gramma oggetto. Poiché il programma non contiene pseudo-op DW nè 
DB ed esiste un unico indirizzo simbolico definito, la tabella dei simboli 
degli indirizzi risulta molto breve. TEA, perciò, non dovrebbe incon¬ 
trare nessuna difficoltà per caricare automaticamente in memoria il 
programma, a partire dall’indirizzo 050 000 (2800 hex). 

Si inizia quindi il procedimento di assemblaggio e l’utente specifica 
che il programma deve essere caricato automaticamente nella memoria 
R/W (nel corso della seconda passata). Nel corso della prima e seconda 
passata non si danno errori di nessun genere e il listing della terza passata 
permette all’utente di constatare personalmente dove sono memorizzati 
in memoria i valori di 8 bit. L’utente ha introdotto il comando Z, 
facendo avvenire il trasferimento del controllo ad un programma moni¬ 
tor di sistema in cui è stato introdotto il nome che distingue il prossimo 
programma in ordine di esecuzione (DBUG; un debugger rivolto al 
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Esemplo 2-33. Cambiamento dell'Indirizzo definito. In seguito al quale si 
manifesta un errore di sovrapposizione (OL) nel corso delia seconda passata 

dell'assembler. 


C»L 


000 1 

• 049 H 

0002 LOOPIT. 

DCRC 

«003 

JNZ 

0004 

LOOPIT 

«005 

9 

«006 

«00T 

0*0 

040 206 

077 377 

RET 

LINE # ■ 0097 

>x 


/DECREHENT THE COUNT 
/JUHP BACK IT THE COtNT 
/IS NON-ZERO 

/RETURN VHEN THE COtMT IS ZERO 


OCTAL 

N OR T 1 H 

AUTO-EOA!) TY 

1RR0RS DETECTEB ■ «SO 

« 


OL AT LINE # 0 1- 0002 
ERRORS DETECTEB • 001 


TYCHON EDITOR-ASSEMBLER V- 3 PAGE 01-001 


•040 ISO 


040 

100 

015 

LOOPIT# DCRC 

/DECREHENT THE COUNT 

040 

191 

302 

JNZ 

/JUNP BACK IF THE COUNT 

«40 

102 

100 

LOOPIT 

/IS NON-ZERO 

«40 

103 

040 

0 


«40 

104 

311 

RET 

/RETUlti VHEN THE COUNT IS ZERO 


7 



oz 



WTER A 

C OHM AND* THEN A CR. 

COMM AM D 

■ 

DBUG 

7 

040 100 

/ 

124 

040 101 

/ 

119 

040 112 

/ 

195 

040 103 

/ 

949 

040 104 

/ 

103 


linguaggio assembler). L’uso di DBUG 1 permette di esaminare la 
sezione di memoria R/W dove è memorizzato il programma, che, come 
previsto, è stato caricato in memoria correttamente. Tale circostanza è 
dimostrata dalla corrispondenza tra il contenuto della memoria che si 
osserva grazie a DBUG ed i numeri ottali riportati nel listing. A questo 
proposito non è tanto essenziale conoscere il modo di operare di questo 
monitor di sistema o DBUG, quanto invece è importante rendersi conto 
di ciò che la funzione di auto-caricamento nonché dei suoi pregi e difetti. 

Uno dei vantaggi più evidenti consiste nel fatto che per dar corso 
all’esecuzione del programma in linguaggio assembler, non vi è più 
bisogno di rileggere nel calcolatore una banda perforata o un’audio- 
cassetta con il programma oggetto. Un cambiamento dell’indirizzo defi¬ 
nito posto all’inizio della subroutine può dar luogo all’errore di sovrap- 
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posizione (OL). Dato che, come dimostra il comando Q (QUERY) 
impiegato nell’Esempio 2-32, le sei linee di testo sono memorizzate nelle 
locazioni di memoria da 040 000 a 040 206 (da 2000 a 2086 hex), il 
cambiamento in 040 100 (2040) dell’indirizzo definito posto all’inizio 
della subroutine potrebbe causare un errore di sovrapposizione. Nell’E¬ 
sempio 2-33 l’indirizzo definito è stato, per l’appunto, cambiato in tal 
modo. Dopo il listing del programma e l’introduzione dei comandi Q 
(QUERY) ed X (ASSEMBLE), alla domanda “AUTO-LOAD?” 
l’utente risponde con Y (YES). 

L'esecuzione della prima passata è così avvenuta senza che si manife¬ 
stassero errori. Non così per la seconda passata: allorché TEA si è 
accinto a riporre il codice corrispondente al simbolo DCRC nella loca¬ 
zione di memoria 040 100, si è manifestato l’errore di sovrapposizione. 
Come prevedibile, il numero di linea elencato nel messaggio di errore fa 
riferimento alla prima linea contenente un simbolo di istruzione. Se ne 
deduce che la semplice definizione dell’indirizzo 040 100 non comporta, 
di per se, il manifestarsi di un errore; prima che quest’ultimo si manifesti 
occorre che TEA si accinga realmente a riporre un qualche valore in 
quella locazione di memoria. 

Si è già avuto occasione di accennare a come la tabella dei simboli 
degli indirizzi generata da TEA sia memorizzata subito di seguito al text 
buffer. È possibile dimostrare che TEA memorizza “qualcosa” dopo le 
linee di testo “sfruttando" l’errore di sovrapposizione. Nell’Esempio 
2-34 l’indirizzo definito è stato cambiato in 040 215, superiore a quello 
dell’ultima locazione di memoria utilizzata dal text buffer come risulta 
dal comando Q (QUERY). Anche questo indirizzo, tuttavia, porta TEA 

Esemplo 2-34. Rivelazione della presenza della tabella del simboli degli 
Indirizzi per mezzo del messaggio di errore di sovrapposizione (OL). 


»a 

MI 816 

•77 377 

LINK » » SIST 
0*CI 

•MI ••«• SIS 

••18 7 

ox 

OCTAL 

N OR T 7 H 
AUTO-LOAD 77 
DtaORS DETECTED • III 

• 

OL *7 LINE * ll-IIIS 
7 

OC1 

•III ••«• 885 

IMS 7 
OX 
OCTAL 

N OR T 7 N 
AUTO-LOAD 77 
DtRORS DETECTEO - III 

M 

DtRORS DETECTEO - ••• 
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Esemplo 2-35. Prove di assemblegglo di un programma contenente delle 
stringhe di caratteri non definite. 


C-L 

0001 *050 000 

0102 START# LXISP /LOAD THE STACX POINTER VITH 

0003 STACX /A R/V MEMORY ADDRESS 

0004 0 

0005 CALL /SET A CHARACTER FROM THE 

0006 TTYIN /TELETYPEVRITER OR CRT 

0007 0 

000S MOVZA /SAVE THE ASCII CHARACTER IN C 

0009 INRS /INCREMENT THE D RESISTER 

0010 JNZ /ir NON-ZERO. GET ANOTHER 

0011 LOOP /CHARACTER 

0012 0 

0013 
ox 

OC TAL 

M OR T 7 M 

AUTO-LOAD 7N 

ERRORS DETECTED - 000 

UD AT LINE • 01-0003 

UD AT LINE « 0 1-0006 

UD AT LINE » 01-0008 

UD AT LINE » 0 1-0009 

UD AT LINE » 01-0011 

ERRORS DETECTED - 005 


TYCHON EDITOR-ASSEMBLER V-3 PAGE 01-001 


•050 000 

050 000 061 START# LXISP /LOAD THE STACK POINTER VITH 
UD AT LINE < 0 1- 0003 

050 001 000 STACX /A R/V MEMORY ADDRESS 

OSO 002 000 0 

050 0 03 315 CALL /GET A CHARACTER FROM THE 

UD AT LINE # 0 1- 0006 

050 004 000 TTYIN /TELETYPEVRITER OR CRT 

OSO 005 000 0 

UD AT LINE » 0I-0ISS 

15» 016 107 MOVZA / SAVE THE ASCII CHARACTER IN C 

UD AT LINE » 01-0009 

• SS 007 004 INRS /INCREMENT THE D REGI STER 

151 Oli 302 JNZ /1F NON-ZERO# GET 4MOTHER 


UD AT LINE » e 1- S 0 I 1 

•Si Oli ISO LOOP /CHARACTER. 

•SS 012 000 0 


TYCHON EDITOR-ASSEMBLER V-3 PAGE 01-002 


START •050 000 
ERRORS DETECTED • 005 
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a generare il messaggio di errore OL. L’incremento a 040 225 dell’indi¬ 
rizzo di memoria fa sì che l’operazione di assemblaggio sia eseguita senza 
errori. Incrementi e decrementi successivi del valore dell’indirizzo defi¬ 
nito consentono di scoprire la prima locazione di memoria disponibile 
dopo la tabella dei simboli degli indirizzi. 

Non Definito (Undeflned) (UD) 

Nel caso che un errore non ricada nel dominio delle altre condizioni di 
errore, TEA procede a generare il messaggio di errore indefinito (UD). 
Analogamente a quanto avviene per gli altri messaggi di errore; TEA 
provvede anche a stampare il numero di blocco ed il numero di linea 
dove si trova memorizzata la stringa di caratteri che risulta non definita. 
La frequenza con cui ci si imbatte in questo messaggio di errore è 
normalmente superiore a quella di tutti gli altri. 

Nell’Esempio 2-35 compaiono alcune stringhe di caratteri non defi¬ 
nite, corrispondenti ad altrettanti errori rilevati nel corso della seconda a 
terza passata di TEA. Come ben si può prevedere, la causa di tali 
messaggi di errore UD sono le stringhe STACK, TTY1N, MOVZA, 
INRS e LOOP non definite. Gli indirizzi simbolici dovrebbero essere 
stati definiti come indirizzi simbolici internamente al programma 
oppure per mezzo della pseudo-op D W. E lecito pensare che le istruzioni 
MOVZA ed INRS siano dovute ad un banale errore, per il semplice 
motivo che l’8080 prevede dei simboli di istruzione quasi uguali. L’editor 
di TEA può quindi essere utilizzato per mutare tali simboli in MOVCA 
ed INRD, come giustificherebbero i commenti contenuti nel pro¬ 
gramma. 

Può accadere che i messaggi di errore prodotti da TEA sembrino privi 
di coerenza. Se, ad esempio, si fa uso del simbolo di istruzione JNX, 
TEA provvede a generare un messaggio di errore BN in luogo di quello 
UD che ci si potrebbe attendere. La spiegazione di questa anomalia è da 
ricercarsi nell’organizzazione interna di TEA. Se esso non riesce a 
trovare il simbolo JNX nella tabella dei simboli permanenti (nella quale 
sono memorizzati tutti i simboli validi di istruzione dell’8080, passa a 
controllare che non si tratti di un indirizzo simbolico valido (da qui la 
possibilità di creare in un programma una tabella degli indirizzi simbolo¬ 
gia). Nel caso che non si tratti nemmeno di un indirizzo simbolico, TEA 
provvede a verificare che la stringa non sia per caso stata definita 
mediante la pseudo-op DB e, in caso negativo, che non si tratti di un 
numero ottale o esadecimale valido. Poiché la stringa non lo è, il risul¬ 
tato finale è un messaggio di errore BN. L’importante non è, dunque, di 
preoccuparsi che il messaggio di errore abbia un significato inequivoca¬ 
bile, ma, piuttosto, di cercare si stabilire le cause prima dell’errore. In 
ordine di probabilità, può darsi che sia stato compiuto un errore di 
battitura; che per il simbolo di istruzione l’indirizzo definito, il com¬ 
mento o l’indirizzo simbolico non sia stato utilizzato il formato corretto 
già specificato in altra parte di questo stesso capitolo; oppure che ci si sia 
dimenticati di definire una stringa per mezzo della pseudo-op DB o D W. 
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ASSEMBLAGGIO DI UN PROGRAMMA MEMORIZZATO IN 
MEMORIA R/W 

In molti degli esempi già riportati si è potuto osservare come l’impiego 
di TEA permetta di assemblare programmi memorizzati in memoria 
R/W (text buffer). I passi che, in generale, bisogna effettuare per assem¬ 
blare un programma memorizzato interamente in memoria R/W pos¬ 
sono essere riassunti come segue. 

(1) Carica TEA in memoria R/W ed avvia la sua esecuzione. Nel caso 
che esso sia già memorizzato in memoria EPROM sarà sufficente farlo 
partire. Introduci un indirizzo iniziale ed uno finale per il buffer in ottale 
o esadecimale. Se il programma sorgente è unico e deve essere memoriz¬ 
zato in memoria R/W tutto in una volta, riserva al text buffer quanto più 
spazio di memoria R/W sia possibile. Crea il programma sorgente 
valendoti della tastiera della telescrivente o del CRT (IONOEC), o 
trascrivilo in TEA servendoti del comando R (READER: lettore) del 
dispositivo IOR, seguito da uno dei comandi A (APPEND), I (INSERT) 
o C (CHANGE). 

(2) Allorché il programma è stato editato in modo soddisfacente, 
riponilo nel dispositivo IOP che può essere un registratore da cassette o 
una perforatrice di banda. Questa precauzione garantisce di poter rileg¬ 
gere di nuovo in TEA il programma sorgente nell’eventualità che la sua 
copia in memoria risulti, per un qualsiasi motivo, distrutta o alterata. 

(3) Una volta messo al sicuro il programma sorgente nel dispositivo 
IOP, introduci il comando X (ASSEMBLE), al quale TEA risponde 
stampando OCTAL oppure HEXADECIM AL, seguito dalla domanda 
“M OR T?”. 

Le parole OCTAL e HEXADECIMAL denotano il sistema di nume¬ 
razione che sarà utilizzato nel generare il listing corrispondente alla terza 
passata. Nel caso si voglia effettuare la conversione dall’uno all’altro dei 
due sistemi, è sufficiente introdurre un CRTL/C e, quindi, una volta che 
TEA è tornato al modo di comando, farlo seguire dal comando O 
(OCTAL) oppure H (HEXADECIMAL) per reintrodurre, da ultimo, il 
comando X (ASSEMBLE). 

TEA stamperà una seconda volta il sistema di numerazione da utiliz¬ 
zare nel listing della terza passata e formulerà la domanda “M OR T?”. 
Dal momento che il programma che si desidera assemblare è memoriz¬ 
zato interamente in memoria, deve essere introdotta un M. TEA chie¬ 
derà a questo punto se la versione oggetto del programma dovrà essere 
caricata automaticamente in memoria nel corso della seconda passata 
(AUTO-LOAD?). Dopo l’introduzione di N (NO) oppure Y (YES), 
TEA comincerà il procedimento di assemble. 

Dopo aver creato la tabella dei simboli degli indirizzi nel corso della 
prima passata, TEA provvede a stampare “ERRORS DETECTED” 
(Errori rilevati), insieme al numero degli eventuali errori di definizione, 
passando quindi ad effettuare la seconda passata attraverso il pro¬ 
gramma sorgente. 

Nel corso di questa passata TEA provvede ad inviare in uscita verso il 
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dispositivo IOP (perforatrice di I/O) la versione oggetto del programma 
e, se necessario, a caricarla in memoria. Nel caso che TEA compia 
quest’ultima operazione, esso non procede a nessun tipo di controllo 
diretto ad accertare che il programma non sia riposto in un’area di 
memoria inesistente oppure a sola lettura. Il suo lavoro si limita a 
controllare che non si verifichi sovrapposizione. 

Se, in funzione di dispositivo di I/O sia come perforatrice (IOP) che 
come unità di uscita (IOO), si utilizza una telescrivente, può accadere che 
durante la perforazione del nastro siano stampati dei caratteri privi di 
senso compiuto. Tali caratteri non sono significativi e la loro presenza è 
giustificata unicamente dal fatto che alcuni codici binari della versione 
oggetto del programma corrispondono a dei caratteri ASCII compresi 
tra quelli che la stampante è in grado di stampare. Se si esaminano con 
attenzione gli esempi di programma riportati in questo capitolo, illu¬ 
stranti l’impiego di TEA per assemblare il programma già presente in 
memoria, alcuni di tali caratteri sono stampati di seguito al primo 
messaggio “ERRORS DETECTED” generato da TEA al termine della 
prima passata. 

(4) Nel caso che nel corso della seconda passata siano rilevati degli 
errori, questi saranno posti in evidenza mediante i messaggi di errore che 
sono stati appena trattati. Tali messaggi di errore saranno inviati al 
dispositivo di INO di uscita (IOO) nel corso del procedimento di assem¬ 
blaggio. Una volta che il messaggio “ERRORS DETECTED” è stato 
inviato in uscita al termine della seconda passata, è possibile introdurre 
un CTRL/C nel caso che si siano manifestati degli errori in modo che, 
facéndo ritorno al modo di comando, TEA possa essere utilizzato per 
correggerli, qualunque sia la loro natura. Una volta corretti gli errori, è 
necessario riporre sul dispositivo perforatore di I/O (IOP) la nuova 
versione del programma sorgente. E bene ricordare che gli errori rilevati 
consistono in errori sintattici e non in errori di logica o di “flusso del 
programma” per cui è possibile che la ricerca e correzzione degli errori 
contenuti nel programma richieda l’ulteriore impiego di un debugger. 

(5) Continua a servirti dell’editor e dell’assembler sino ad ottenere un 
programma assemblato esente da errori come si può stabilire in base al 
messaggio di errore che TEA stampa al termine della seconda passata del 
procedimento di assemblaggio. 

Non appena tale procedimento si è compiuto senza errori, ferma TEA 
con un CTRL/C per tornare nel modo di comando. A questo punto, è 
necessario mettere in funzione o abilitare il dispositivo perforatore di 
I/O (IOP) che deve essere utilizzato per memorizzare la versione oggetto 
del programma (sorgente). Tale dispositivo può consistere nella perfora¬ 
trice di banda della telescrivente o in registratore a cassette nel modo di 
funzionamento RECORD (registra). Dopo di ciò, fai ripartire con il 
comando X (ASSEMBLE) il procedimento di assemblaggio. L'esecu¬ 
zione di questo passo è necessaria solamente se si desidera accantonare 
su di un dispositivo periferico la versione oggetto del programma. 

(6) Una volta ottenuto un programma assemblato senza errori e fatto 
ripartire l’assembler, la versione oggetto del programma è posta in uscita 
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verso il dispositivo perforatore di I/O (IOP) nel corso della seconda 
passata. Dopo che sul dispositivo di INO (IOO) è stato stampato il 
messaggio di errore che conclude la seconda passata, la perforatrice di 
banda o il registratore a cassette possono anche essere esclusi. Il listing 
del programma assemblato sarà generato nel corso della terza passata e 
inviato al dispositivo di uscita di I/O (IOO). Una volta stampati il listing 
del programma assemblato ed il contenuto ordinato della tabella dei 
simboli degli indirizzi, TEA fa ritorno al modo di comando. E possibile, 
a questo punto caricare in memoria la versione oggetto del programma 
(solamente nel caso che a questo non abbia già provveduto la funzione di 
caricamento automatico) per procedere quindi alla sua esecuzione. 
Volendo caricare in memoria la versione oggetto del programma, 
occorre posizionare l’estremità iniziale della banda nel lettore di banda 
oppure riavvolgere la cassetta registrata, introdurre il comando B 
(BOOTSTRAP) e quindi avviare il lettore di banda o il registratore. 
Terminata del tutto la lettura in memoria della versione oggetto del 
programma si può introdurre il comando Z (EXIT) in modo che l’8080 
esegua un programma monitor di sistema o un debbuger. Sia l’uno che 
l’altro consentono di cominciare l’effettiva esecuzione della versione 
oggetto del programma. 

Nel caso che nel programma vi siano da apportare delle correzioni, si 
può avviare un’altra volta TEA e, se il text buffer è “intatto”, eseguire 
ulteriori operazioni con l’editor e quindi assemblare di nuovo il pro¬ 
gramma. Sfruttando alternativamente le possibilità insite in TEA e nel 
monitor di sistema o nel debugger, si dovrebbe giungere in breve a creare 
un programma privo di errori assemblabile ed eseguibile correttamente 
sul microcalcolatore. 

OSSERVAZIONE: Si osservi che, nel caricamento in memoria di un 
programma oggetto in base all’impiego del comando B (BOOTSTRAP), 
non è compiuto nessuno dei passi di confronto per sovrapposizione 
proprio della funzione di auto-caricamento. Ne discende che, caricando 
in memoria da banda un programma oggetto, questo può essere tra¬ 
scritto sopra le parti del tet buffer oppure in locazioni di memoria 
temporanea e area di stack riservate a TEA. Non è invece importante se il 
programma pggetto si trova ad essere trascritto sopra la tabella dei 
simboli degli indirizzi o a quella dei byte definiti, per il semplice motivo 
che queste tabelle sono generate ogniqualvolta si esegue la sezione di 
assembler di TEA. L’impiego del comando B (BOOTSTRAP) per il 
caricamento in memoria di programmi oggetto richiede perciò le dovute 
cautele. 

ASSEMBLAGGIO DI UN PROGRAMMA MEMORIZZATO SU 
DI UN DISPOSITIVO DI I/O PERFORATORE (IOP) 

Può avvenire che, ad un certo punto, il programma sorgente sia 
talmente cresciuto da non poter più essere contenuto tutto insieme in 
memoria R/W. Si rammenti come, nel corso del procedimento di assem¬ 
blaggio, debba esservi uno sapzio di memoria sufficiente a che TEA 
possa formare la tabella dei simboli degli indirizzi nonché quella dei byte 
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definiti. 

(1) Carica TEA nella memoria R/W e comincia la sua esecuzione. Nel 
caso che TEA sia già memorizzato in memoria EPROM, è sufficiente 
dargli il via. Introduci un indirizzo iniziale ed un indirizzo finale del 
programma in forma ottale oppure esadecimale. Al text buffer è necessa¬ 
rio riservare quanta più memoria è possibile. Crea il programma sor¬ 
gente servendoti della tastiera della telescrivente o del CRT (IONOEC), 
oppure leggi in TEA il programma sorgente valendoti del comando R 
(READER) del dispositivo IOR, seguito da uno dei comandi A 
(APPEND), I (INSERT) o C (CHANGE). 

Dato che il programma sorgente è troppo lungo per poter essere 
contenuto tutto insieme in memoria, esso deve essere spezzato in blocchi 
comprendenti dalle 100 alle 200 linee di testo, che saranno riposti sul 
dispositivo di perforazione I/O (IOP) valendosi del comando P 
(PUNCH). Si ricordi che questo dispositivo non può consistere in un 
registratore a cassetta in quanto, in tal caso, la lettura del testo nell’as- 
sembler dovrebbe essere effettuata a una sola riga per volta. 

Normalmente, non è possibile sapere in anticipo se il programma 
sorgente è troppo grande per trovare in memoria spazio sufficiente che lo 
contenga tutto insieme. Può avvenire ad esempio, che TEA generi un 
messaggio di errore ME! mentre si sta introducendo in esso il pro¬ 
gramma sorgente. Oppure, anche se in memoria vi è sufficientemente 
spazio per il programma sorgente, può accadere che TEA generi un 
messaggio di errore ME! nel corso del processo di assemblaggio. È 
necessario, in questo caso, salvare sul dispositivo perforatore (IOP) di 
I/O tutto il testo presente in memoria. Valendosi del comando P 
(PUNCH) e specificando due numeri di linea, si può spezzare in blocchi 
il programma sorgente senza nessuna difficoltà. Una volta avvenuta la 
perforazione dell’intero text buffer, questo può essere tranquillamente 
cancellato dalla memoria. E possibile, allora passare alla edizione del 
resto del programma (o di gran parte di esso) nonché alla sua suddivi¬ 
sione in blocchi man mano che si procede il suo salvataggio sul disposi¬ 
tivo IOP. Al termine deH’ultimo blocco non si dimentichi il segno del 
dollaro ($). 

(2) Avvenuta la completa edizione dei programmi sorgente e il suo 
salvataggio in blocchi sul dispositivo IOP, si deve introdurre il comando 
X (ASSEMBLE), al quale TEA risponde con uno dei due termini 
OCTAL o HEXADECIMAL, a seconda del sistema di numerazione da 
adottarsi per il listing della seconda passata. Volendo effettuare la 
conversione dall’uno all’altro dei due sistemi di numerazione, è suffi¬ 
ciente introdurre un CTRL/C, al quale TEA risponderà con C=, 
essendo ritornato nel modo di comando. Per convertire il sistema di 
numerazione utilizzato si può allora introdurre una O (OCTAL) oppure 
una H (HEXADECIMAL). Quando, al termine di questa frase, si 
introduce la X (ASSEMBLE), TEA risponde specificando il sistema di 
numerazione che sarà utilizzato nel listing della terza passata e formula 
la domanda “M OR T?”, alla quale si risponde con T, in quanto si 
desidera assemblare il programma sorgente da banda. Alla successiva 
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domanda AUTO-LOAD? è possibile rispondere sia con N (NO) che con 
Y (YES), a seconda o meno che la versione oggetto del programma 
debba essere caricata in memoria nel corso della seconda passata dell’as- 
sembler. 

(3) TEA stamperà quindi “R?” per sollecitare all’utente l’inizio del 
colloquio, dandogli con ciò l’opportunità di posizionare nel lettore del 
nastro il leader del nastro presente in testa al primo blocco del pro¬ 
gramma sorgente. Esauriti questi preliminari, si prema il tasto R della 
telescrivente o del CRT (IONOEC), facendo sì che TEA effettui la 
lettura dei blocchi del programma sorgente. Al procedere della lettura 
della banda, TEA forma la tabella dei simboli degli indirizzi. Allorché 
legge il segno del dollaro posto a chiusura dell’ultimo blocco, TEA 
provvede a stampare il numero di errori (REDEF) rivelatisi nel corso 
della prima passata. In caso di errori il numero di blocco stampato nel 
messaggio di errore ha la funzione di aiutare a localizzare il blocco di 
codice sorgente contenente l’errore REDEF. Dopo che, grazie all’im¬ 
piego dell’editor il codice è stato corretto, si può ridare il via al procedi¬ 
mento di assemblaggio ripartendo dal Passo 2. 

Nel caso che non sia stato rivelato alcun errore, si può effettuare la 
seconda passata del procedimento di assemblaggio. L’estremità iniziale 
della banda deve quindi essere posta nel lettore di banda ed il dispositivo 
perforatore IOP di I/O deve essere abilitato nel caso che si desideri una 
copia del codice oggetto. 

Una volta che il dispositivo IOP è stato abilitato (ossia la perforatrice 
di banda posta in funzione o il registratore a cassette predisposto nel 
modo RECORD), si deve premere il tasto R della telescrivente o del CRT 
in risposta alla domanda “R?” di TEA. Premuto il tasto R, TEA comin¬ 
cia a leggere una linea di testo per volta, assemblandola e ponendo in 
uscita verso il dispositivo IOP il corrispondente byte di 8 bit. Al rileva¬ 
mento del segno del dollaro posto a chiusura della banda, TEA perfora 
sulla banda una “coda”, stampa il numero degli errori rilevati nel corso 
della seconda passata e avanza la domanda “R?”. Gli errori eventual¬ 
mente rilevati devono essere corretti valendosi dell’editor ed il procedi¬ 
mento di assemblaggio riavviato da capo (lettura in TEA del nastro 
perforato in modo da poter formare la tabella dei simboli e degli indirizzi 
ecc.) 

Se, al termine della seconda passata, non è stato rilevato alcun errore, 
l’estremità iniziale della banda deve essere posizionata un’altra volta nel 
lettore di banda, premendo quindi il tasto R della telescrivente o del 
CRT. TEA procede a questo punto alla lettura di una linea di testo, 
assemblandola e stampando l’indirizzo di memoria ed il suo codice 
simbolico sul dispositivo di I/O di uscita (IOO), unitamente alla linea di 
programma sorgente. Allorché TEA giunge al termine di un blocco del 
programma sorgente, esso provvede a stampare tanti ritorni di carrello e 
avanzamenti di linea quanti ne occorrono per arrivare all’inizio della 
pagina successiva, incrementando il numero di blocco e aprendo una 
nuova pagina per il nuovo blocco di programma sorgente. Allorché TEA 
incontra il segno del dollaro, posto a chiusura della banda, provvede 
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ancora a stampare tanti ritorni del carrello e avanzamenti di linea quanti 
sono necessari ad arrivare alla pagina seguente. 

Si effettua quindi l’ordinamento dei contenuti della tabella dei simboli 
degli indirizzi, seguito dalla stampa del risultato di questa operazione. 
Per programmi di lunghezza considerevole, il tempo occorrente a TEA 
per l’ordinamento degli elementi della tabella dei simboli degli indirizzi 
può risultare particolarmente lungo: per ordinare 540 indirizzi simbolici 
TEA impiega 90 secondi. Una volta che è stata stampata la tabella dei 
simboli degli indirizzi, TEA provvede a stampare il numero degli errori 
rilevati nel corso della terza passata. 

(4) A questo punto l’utente ha la facoltà di caricare in memoria il 
programma oggetto mediante il comando B (BOOTSTRAP), oppure di 
eseguire il programma oggetto precedentemente caricato in memoria per 
mezzo della funzione di auto-caricamento. Questo è sempre possibile a 
patto che nel corso della seconda passata non si siano manifestati errori 
OL (OVERLAP). Se, nel corso del procedimento di assemblaggio, si è 
manifestato qualche errore, il blocco (o i blocchi) del programma sor¬ 
gente che contiene gli errori deve essere riletto in TEA servendosi del 
comando R (READER), seguito da uno dei comandi A (APPEND), 1 
(INSERT) e C (CHANGE). Ogni blocco di programma sorgente, al 
termine della sua edizione, deve essere messo da parte sul dispositivo 
perforatore (IOP) di I/O. Nel caso che si utilizzi una banda perforata, 
questo nuovo blocco deve essere “giuntato" dentro alla banda di origine 
nella sequenza appropriata. Tale operazione di montaggio costituisce un 
fastidio che pur bisogna affrontare. E infatti molto più facile lavorare 
con un programma consistente in dieci blocchi diversi congiunti insieme 
che non con dieci bande distinte, poiché con queste ultime, è quanto mai 
difficile evitare che esse siano lette nel microcalcolatore nell’ordine 
sbagliato. 

Come si può notare, il grande vantaggio offerto da questo sistema di 
assemblare un programma da banda è quello di poter trattare pro¬ 
grammi anche molto lunghi, pur disponendo soltanto di 8 o 12 K di 
memoria R/W, quanto basta cioè per memorizzare TEA insieme ad un 
pò di testo. Per contro questo modo di assemblare un programma 
comporta un lavoro decisamente più gravoso che non operando diretta- 
mente dalla memoria. 

L’Esempio 2-36 illustra le modalità secondo cui avviene la creazione 
di un programma, la sua suddivisione in vari blocchi ed il suo assemblag¬ 
gio. E dapprima elencato (LI) il programma presente in memoria. Si 
osservi come l’ultima linea'di testo contenga un segno di dollaro. Per 
suddividere il programma in blocchi si è poi utilizzato il comando punch. 
Il primo blocco (Pl-31) contiene l’indirizzo definito congiuntamente ad 
un indirizzo simbolico definito ed al simbolo di istruzione JMP. Il 
secondo blocco (P4-61) contiene l’indirizzo simbolico relativo all’istru¬ 
zione JMP insieme ad uno zero (il terzo byte dell’istruzione stessa) ed al 
segno del dollaro. Il risultato elencato nell’Esempio 2-36 è stato ottenuto 
servendosi di una telescrivente che comprendeva una perforatrice di 
banda. Sulla stampante sono, perciò, stati stampati anche i risultati 
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Esemplo 2-36. Assemblaggio di un programma da banda servendosi del 
dispositivo lettore I/O (IOR). 
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“compressi” ottenuti in base al comando punch. 

Dopo che il programma è stato trasferito a blocchi su banda perfo¬ 
rata, si introduce il comando X (ASSEMBLEI. Il listing relativo alla 
terza passata dovrà risultare in ottale, mentre TEA riceve l’istruzione 
che il programma da assemblare è contenuto su banda (T). Non si 
desidera inoltre che, nel corso della seconda passata, il programma 
oggetto sia caricato in memoria. TEA formula la domanda “R?”, per cui 
si procede a montare il nastro perforato sul lettore di nastro, premendo 
quindi il tasto R della telescrivente. Avviene così la lettura di entrambi i 
blocchi della banda, che consente a TEA di formare la tabella dei simboli 
degli indirizzi. Allorché legge il segno del dollaro che chiude il secondo 
blocco, TEA stampa il messaggio di errore e, quindi, ripropone una 
seconda volta la domanda (R?) di sollecito lettura. 

L’estremità iniziale della banda è quindi nuovamente ricollegata nel 
lettore ed il tasto R della telescrivente premuto. TEA perfora sulla 
telescrivente la banda con il programma oggetto (si badi ai due carat¬ 
teri @), stampa il numero di errori rilevati e quindi si pone in attesa che 
l’utente monti la banda e prema il tasto R ancora una volta, dando poi 
inizio al listing relativo alla terza passata. E così prodotta la prima 
pagina del primo blocco (pagina 01-001). Dato che l’indirizzo definito, 
l’indirizzo simbolico definito ed il simbolo di istruzione JMP sono gli 
“unici” caratteri contenuti nel primo blocco, TEA stampa la linea che 
contiene il simbolo JMP e quindi fa avanzare il foglio sino al principio 
della pagina successiva. Per economia di spazio, le linee vuote tra una 
pagina e l’altra sono state qui eliminate. 

TEA stampa quindi la pagina uno del blocco due (02-001), contenente 
l’indirizzo simbolico e Io zero relativi all’istruzione JMP. Dette stringhe 
sono elencate insieme alle dovute informazioni relative agli indirizzi ed 
ai dati. Avendo rilevato il segno di dollaro con cui termina il secondo 
blocco, TEA fa avanzare nuovamente il foglio sino al principio di pagina 
02-002 dove sono stampati gli elementi ordinati della tabella dei simboli 
degli indirizzi. E evidente che, essendovi nella tabella un unico indirizzo 
simbolico, non è possibile accorgersi che vi è stata un’operazione di 
ordinamento. Dopo la stampa dell’indirizzo simbolico START, TEA 
provvede a stampare il numero di errori rilevati nel corso della terza 
passata. Il foglio è poi fatto avanzare sino a che la pagina 02-002 possa 
ritenersi completata e TEA ritorna al modo di comando. 

CARICAMENTO IN MEMORIA DI UN PROGRAMMA 
•OGGETTO 

Nel caso che si decida di non valersi della funzione di autocaricamento 
di TEA per caricare in memoria la versione oggetto del programma nel 
corso della seconda passata dell’assembler, bisogna valersi del comando 
B (BOOTSTRAP). L’impiego di questo comando permette di caricare in 
qualunque momento in memoria qualsiasi programma oggetto generato 
da TEA. 

1. Per caricare in memoria un programma oggetto, occorre collocare 
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nel lettore di nastro il leader (parte iniziale) della banda perforata 
(Appendice A). 

2. Con TEA nel modo di comando, introduci il comando B (BOOT- 
STRAP). 

3. Sposta la levetta dello switch di selezione della telescrivente nella 
posizione START. 

4. Allorché la lettura del nastro nel microcalcolatore è terminata, 
TEA esegue un confronto mediante la procedura “comparesum” 
(analoga a checksum) per controllare che non vi siano stati errori 
di lettura da banda dei codici ivi presenti. Nel caso che vi sia stato 
qualche errore, TEA provvede a stampare il messaggio di errore 
BAD CHECKSUM (somma di controllo errata). In questo caso, è f 
bene non fare nessun tentativo di eseguire ugualmente il pro¬ 
gramma appena letto in memoria. Poiché non vi è nessuna possibi¬ 
lità di stabilire dove sia avvenuto l’errore, occorre rileggere in 
memoria una seconda volta l’intera banda, se gli errori persistono, 
è probabile che sia la banda a contenere un errore, rendendo 
perciò necessaria la ripetizione dell’assemblaggio del programma. 

Nel caso che TEA ritorni senz’altro al modo di comando al termine 
della lettura in memoria dell’intera banda perforata, si può essere certi 
che non vi sono stati errori. Può quindi essere introdotto il comando Z, 
mediante il quale il controllo è trasferito ad un monitor di sistema o ad 
un debugger. Per dare inizio all’effettiva esecuzione del programma ci si 
può quindi servire di uno di questi programmi. 
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CAPITOLO 3 


Convenzioni relative 
ai dispositivi di I/O 


Per poter funzionare, TEA deve avere la possibilità di accedere a 
dispositivi di I/O, le cui funzioni possono variare a seconda dei casi: 
introdurre i comandi o linee di testo, listare il contenuto del text buffer e 
salvare, memorizzandolo in qualche dispositivo periferico, il contenuto 
del buffer o un programma oggetto. Le subroutine di I/O contenute in 
TEA, adibite a questo scopo, sono in tutto sei. Tuttavia, non sono 
chiamate direttamente da TEA che vi accede passando attraverso una 
“tabella di salto” (j um P table). E detta tabella di salto una normale 
tabella che contiene diverse istruzioni di salto a tre byte. Anziché effet¬ 
tuare direttamente la chiamata di una delle subroutine di I/O, TEA 
chiama una delle locazioni di memoria contenente una di queste istru¬ 
zioni di salto. Con l’esecuzione dell’istruzione di salto il controllo del 
programma è restituito all’interno di TEA alla subroutine di I/O. 

L’utente può facilmente sostituire i dispositivi di I/O ai quali TEA ha 
accesso, cambiando il secondo e terzo byte delle istruzioni di salto in 
tabella. Il cambiamento del secondo e terzo byte delle istruzioni di salto, 
consente, inoltre, l’utilizzazione da parte di TEA di una subroutine 
predisposta dall’utente. Volendo scrivere subroutine di I/O funzionanti 
correttamente nell’ambito di TEA, è comunque necessario che l’utente 
tenga ben presente le caratteristiche delle subroutine di I/O già comprese 
in TEA. Note tali caratteristiche, si possono scrivere nuove subroutine di 
caratteristiche analoghe, anche se il loro impiego riguarda l’accesso a 
dispositivi periferici che sono differenti. 


CARATTERISTICHE DELLE SUBROUTINE DI I/O 

Le subroutine di I/O comprese in TEA sono sei. Questo capitolo si 
occupa, per l’appunto, delle modalità di funzionamento di ciascuna di 
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esse e dei registri interessati. Nel caso che nuove subroutine di I/O 
debbano servirsi di registri diversi da quelli indicati, è indispensabile che 
questi registri siano salvati nello stock prima che possano essere impiegati 
nella subroutine, e che, in seguito, siano ripristinati prima del ritorno 
dell’8080 dalla subroutine. 


IOTEST 

Questa subroutine effettua una volta per tutte un test del flag di 
dati-disponibili della tastiera. Al ritorno dell’8080 dalla subroutine 
IOTEST, il registro A conterrà zero oppure avrà un contenuto diverso 
da zero a seconda che non sia stato premuto nessun tasto oppure sia 
stato premuto un qualsiasi tasto. Il test del flag di zero può essere 
effettuato subito dopo la restituzione del controllo da parte della 
subroutine. La funzione di quest’ultima non è quella di porre in ingresso 
il codice ASCII a sette-otto bit proveniente dalla tastiera nel caso di tasto 
premuto, ma unicamente di effettuare il test del flag della tastiera. 
IOTEST è per l’appunto, la prima subroutine il cui indirizzo è contenuto 
nella tabella di salto. La sua chiamata fa sì che l'8080salti alla subroutine 
INCHK contenuta in TEA e riportata nell’Esempio 3-1 

Esemplo 3-1. La subroutlne INCHK (keyboard (lag chele controllo del (lag 

della tastiera). 

006 121 333 INCHK, IN /JI-'ST GtT Tilt KtYbOARD FLAG 

006 122 001 001 

006 123 346 «NI /AND StT THE FLAGS bASED l)N ITS STATE 

006 1 2 4 00 1 00 1 

006 125 311 RtT 

Il compito della subroutine INCHK si riduce a cambiare il contenuto 
del registro A e lo stato dei flag. Dovendo utilizzare dei registri addizio¬ 
nali in una versione della subroutine INCHK, occorre che essi siano 
posti sullo stack all’inizio della subroutine e prelevati al termine della 
stessa. Con l’esecuzione dell’istruzione RET con cui termina INCHK, 
P8080 fa ritorno all’istruzione presente in memoria dopo la chiamata 
CALL di IOTEST. 

IONOEC 

Il compito di questa subroutine consiste nell’effettuare continui test 
del flag di dati-disponibili della tastiera. Nel caso che il flag sia in uno 
logico, l’8080 pone in ingresso il codice ASCII battuto sulla tastiera. Il 
bit più significativo del codice di otto bit (il bit di parità) è posto quindi a 
zero. L’8080 fa ritorno dalla subroutine IONOEC con il codice ASCII di 
sette bit contenuto nel registro A. Il relativo carattere ASCII non è però 
stampato sulla stampante. IONOEC costituisce la seconda subroutine 
con indirizzo chiamato da un’istruzione di salto della tabella di salto. 
Chiamando la subroutine TTYI contenuta in TEA e riportata nell’E¬ 
sempio 3-2. 
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Esempio 3-2. La subroutine TTYI (keyboard Input, no echo: ingresso da 
tastiera senza eco). 


(JU6 

152 

333 TTYI/ 

IN 

/GET THE PRINTER # S ANL KEYbOARL'S 

C06 

153 

001 

00 1 

/FLaGS 

006 

154 

346 

ANI 

/SAVE JUST TUE KEYLOaRD'S FLAG 

006 

155 

001 

001 


006 

156 

312 

JZ 

/IF THE FLAG IS ZERO/ VaIT FOR IT 

006 

157 

152 

TTYI 

/TO EE A LOGIC ONE/ MEaNING THAT a 

006 

160 

006 

0 

/< EY HAS BEL*! PRESSEb. 

006 

161 

333 

IN 

/A KEY VAS PRRSSEL/ INPUT ITS 

006 

162 

000 

000 

/ASCII VALVE. 

006 

163 

346 

ANI 

/MAS* OVT ANY PaRITY BIT 

006 

164 

177 

177 


006 

165 

311 

RET 

/AND RETURN VI^H IT IN THE A FEGISTER 


La subroutine TTYI si limita a cambiare il contenuto del registro A e 
lo stato dei flag. Nel caso che una nuova versione della subroutine TTYI 
abbia bisogno di impiegare dei registri addizionali, questi devono essere 
aggiunti allo stack all’inizio della subroutine e prelevati da esso al 
termine della medesima. In seguito all’esecuzione dell’istruzione RET 
con la quale termina la subroutine TTYI, l’8080 fa ritorno all’istruzione 
presente in memoria subito di seguito alla chiamata CALL di IONOEC. 


IOECHO 

La funzione di questa subroutine è quella di permettere l’ingresso di 
un carattere da una tastiera ASCII e la sua stampa sulla stampante di 
una telescrivente o lo schermo di un CRT. Avvenuta la stampa del 
carattere, si procede ad un nuovo controllo della tastiera al fine di 
stabilire se, mentre la stampante era in azione, non sia stato introdotto 
un CTRL/C. In caso affermativo, lo stack pointer è resettato e I’8080 
salta alle istruzioni corrispondenti all'inizio di TEA, in base alle quali 
TEA passa al modo di comando e stampa C=. Nel caso che sia stato 
premuto un tasto non corrispondente ad un CTRL/C, la circostanza è 
ignorata e l’8080 ritorna alla sezione di TEA in cui è avvenuta la 
chiamata della subroutine IOECHO. Quest’ultima costituisce la terza 
subroutine alla quale si indirizza un’istruzione di salto nella tabella di 
salto. Con la chiamata della subroutine IOECHO l’8080 effettua un 
salto indietro alla subroutine TTYIN contenuta in TEA e riportata 
nell’Esempio 3-3. 

La subroutine TTYIN cambia il contenuto dei registri A e B e gli stati 
dei flag. Nel caso che una nuova versione di TTYIN preveda l’impiego di 
altri registri, è necessario che questi ultimi siano aggiunti allo stack al 
principio del subroutine e prelevati da esso al termine della medesima. 
Con l’esecuzione delle istruzioni RZ o RNZ con le quali termina TTYIN 
(nell’ipotesi che non sia stato introdotto un CTRL/C) l’8080 ritorna ad 
eseguire l’istruzione che si trova in memoria subito dopo la chiamata 
CALL di IOECHO. 

A proposito di questa subroutine, è opportuno procedere con la 
massima cautela, soprattutto se i registri sono aggiunti allo stack e le 
istruzioni di ritorno condizionato sono lasciate nella subroutine. Si 
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consiglia di trasferire queste ultime in istruzioni di salto condizionato 
allo scopo di facilitare lo svuotamento dello stack. 

IOP 


La funzione di questa subroutine è quella di aiutare a perforare un 
carattere su banda oppure a registrarlo su di un’audio-cassetta. Chia¬ 
mando la subroutine IOP, T8080 effettua un salto alla subroutine 
TTYOUT, riportata poco sopra, mediante un’istruzione di salto pre¬ 
sente nella tabella di salto. Come si può notare nell’Esempio 3-3, la 
subroutine TTYOUT costituisce in realtà parte integrante della subrou¬ 
tine TTYIN. Il motivo per cui essa è chiamata risiede nel fatto che nella 
maggioranza dei casi al meccanismo della stampante è collegata mecca¬ 
nicamente una perforatrice di banda di una telescrivente. Questo com¬ 
porta che, con la perforatrice in azione, tutti i caratteri posti in uscita 
sulla stampante risultano anche perforati su banda. Analogamente, ogni 
carattere posto in uscita sulla perforatrice sarà anche stampato sulla 
stampante. 

La subroutine IOP deve essere chiamata solamente quando il valore 
da perforare si trova già nel registro A. La subroutine TTYOUT prov¬ 
vede a mettere provvisoriamente da parte nel registro B tale valore. Con 
il ritorno di TEA dalla subroutine TTYOUT, il valore si troverà ancora 
in entrambi i registri A e B. La subroutine, inoltre, modifica i flag. La 

Esemplo 3-3. Le subroutine TTYIN (poni In Ingresso un carattere, stampalo e 
verifica se c'è un CTRL/C). 


006 

166 

315 

TTYIN* 

CALL 

/GET A KEYBOARD CHARACTER 

006 

167 

152 


TTYI 

/AND PR1NT IT. 

006 

170 

006 


0 


006 

171 

107 

TTYOUT* 

MOVBA 

/SAVE THE CHARACTER IN B 

006 

172 

333 


IN 


006 

173 

001 


001 


006 

174 

346 


AN 1 


006 

175 

004 


004 

/CHECK TO SEE IF THE PRINTER 

006 

176 

312 


JZ 

/IS READY. IT ISN'T* KEEP CHECKING 

006 

177 

172 


TTYOUT* 1 

006 

200 

006 


0 


006 

201 

170 


MOVAB 

/PRINTER IS READY* GET THE CHARACTER 

006 

202 

323 


OUT 


006 

203 

000 


000 

/MD PRINT IT 

006 

204 

315 


CALL 

/SEE IF ANY KEYS HAVE BEEN PRESSED 

006 

205 

000 


IOTEST 


006 

206 

030 


0 


006 

207 

170 


MOVAB 

/GET THE PRINTER CHARACTER BACK IN A 

006 

210 

310 


R Z 

/NO KEYS PRESSED 

006 

211 

315 


CALL 

/A KEY VAS PRESSED* FIND OUT VHAT IT 

006 

212 

003 


IONOEC 


006 

213 

030 


0 


006 

214 

376 


CPI 


006 

215 

003 


CTRLC 

/VAS A CTRL-C TYPED IN? 

006 

216 

170 


MOVAB 

/GET THE OLD PRINTER CHARACTER 

006 

217 

300 


RN Z 

/NO* NOT A CNTRL-C* SO IGNORE IT 

006 

220 

061 


LX1 SP 

/IT VAS A CNTRL-C* 

006 

221 

240 


STACK 

/RESET THE STACK POINTER 

006 

222 

030 


0 


006 

223 

303 


JMP 

/AND SEE VHAT THE USER # S UP TO 

006 

224 

153 

** 

QUEST 


006 

225 

000 


0 
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chiamata della subroutine IOP avviene nel caso che si impieghi il 
comando P (PUNCH: perfora) dell’editor, nonché nel corso della 
seconda passata dell’assembler, quando si desidera ottenere in uscita 
una versione oggetto del programma sorgente. 

La subroutine TTYOUT si avvale dei registri A e B e modifica altresì 
lo stato dei flag. Nel caso di impiego di altri registri in una nuova 
versione di TTYOUT, questi dovranno essere aggiunti allo stack al 
principio della subroutine e prelevati da esso al termine della medesima. 
All’esecuzione dell’istruzione RET, con la quale si conclude la subrou¬ 
tine TTYOUT, l’8080 ritorna all’istruzione presente in memoria di 
seguito alla chiamata CALL di IOP. 


IOR 


La funzione di questa subroutine è quella di permettere la lettura di un 
singolo valore da un lettore di banda o da un registratore a cassette. 
Poiché il lettore di banda perforata e la tastiera della generalità delle 
telescriventi sono collegati meccanicamente in parallelo, questa subrou¬ 
tine si presenta in forma quasi uguale alla subroutine IONOEC (TTYI). 
L’unica differenza sta nel fatto che in primo luogo si ha l’esecuzione di 
un’istruzione OUT in modo che il relè di controllo lettura della telescri¬ 
vente riceva un impulso per l’avanzamento della banda. La subroutine 
incontrata nella tabella di salto. In seguito alla sua chiamata da parte di 


Esemplo 3-4. La subroutlne IORDR (fornisci un Impulso al relè di controllo 
della lettura, poni In Ingresso un carattere). 


006 

126 

323 

IORDR* 

OUT 

/PULSE THE READER CONTROL RELAY 

006 

127 

001 


001 


006 

130 

000 



/THERE IS ENOUGH ROOM HERE FOR /WY 

006 

131 

000 


0 

/TIME DELAY SOFTWARE REQU1 RED FOR A 

006 

132 

000 


0 

/SOFTWARE CONTROLLED READER-CONTROL 

006 

133 

000 


0 

/RELAY* 

006 

134 

000 


0 


006 

135 

000 


0 


006 

136 

000 


0 


006 

137 

000 


0 


006 

140 

000 


0 


006 

141 

000 


0 


006 

142 

000 


0 


006 

143 

000 


0 


006 

144 

000 


0 


006 

145 

000 


0 


006 

146 

000 


0 


006 

147 

000 


0 


006 

150 

000 


0 


006 

151 

000 


0 

• 

006 

152 

333 

TTYI* 

IN 

/GET THE PRINTER # S AND KEYBOARD'S 

006 

153 

001 


001 

/ FLAG S 

006 

154 

346 


ANI 

/SAVE JUST THE KEYBOARD'S FLAG 

006 

155 

001 


001 


006 

156 

312 


JZ 

/IF THE FLAG IS ZERO* WAIT FOR IT 

006 

157 

152 


TTYI 

/TO BE A LOGIC ONE* MEAN1NG THAT A 

006 

160 

006 


0 

/KEY HAS BEEN PRESSED* 

006 

161 

333 


IN 

/A KEY WAS PRESSED* INPUT ITS 

006 

162 

000 


000 

/ASCII value. 

006 

163 

346 


ANI 

/MASK OUT ANY PARITY BIT 

006 

164 

177 


177 


006 

165 

311 


RET 

/AND RETURN W1TH IT IN THE A REGI STER 
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TEA, l’istruzione della tabella di salto trasferisce il controllo del pro¬ 
gramma alla subroutine IORDR contenuta in TEA. Questa subroutine è 
riportata nell’Esempio 3-4. 

Sia l’editor che l’assembler facenti parte di TEA si valgono del disposi¬ 
tivo di 1 OR e della relativa subroutine. Con l’introduzione del comando 
R (READER), si impiega il dispositivo IOR per porre in ingresso al text 
buffer un programma sorgente mediante uno dei comandi A 
(APPEND), I (INSERT) o C (CHANGE). L’Assembler si varrà del 
dispositivo IOR nel caso che il programma sorgente da assemblare sia 
presente su banda (“M OR T?” T). Questo dispositivo deve essere in grado 
di leggere una linea di testo per volta. È proprio questo il motivo per cui è 
necessario il relè di controllo della lettura della telescrivente, senza il 
quale l’8080 è privato di qualsiasi mezzo di controllo sul lettore di banda. 
Ne consegue che risulterà estremamente difficile, se non addirittura 
impossibile, impiegare TEA con una telescrivente priva di un relè di 
controllo della lettura, oppure con un registratore a cassette poiché la 
maggior parte di essi non si presta a leggere una linea di testo per volta. 

La subroutine IOR (IORDR) modifica il contenuto del registro A e lo 
stato dei flag. Nel caso che TEA acceda ad una nuova subroutine, e si 
renda necessario il ricorso a dei registri addizionali, questi ultimi devono 
essere aggiunti allo stack al principio della subroutine IORDR e prele¬ 
vati da esso al termine della medesima. Con l’esecuzione dell’istruzione 
RET, con la quale termina la subroutine IORDR, I’8080 ritorna all’istru¬ 
zione memorizzata di seguito alla chiamata CALL di IOR. 


IOO 

La chiamata di questa subroutine permette che il contenuto del regi¬ 
stro A sia posto in uscita sulla stampante della telescrivente o sulla 
logica/memoria di controllo dello schermo del CRT. Questa è, altresì, la 
quinta ed ultima subroutine alla quale si accede tramite la tabella di 
salto. Allorché TEA effettua la chiamata della subroutinelOO la tabella 
di salto fa avvenire il trasferimento del controllo alla subroutine 
TTYOUT riportata nella sezione IOECHO di questo capitolo. La 
subroutine TTYOUT si serve dei registri A e B e modifica inoltre lo stato 
dei flag. Nel caso che, per una nuova versione della subroutinelOO.si 
renda necessario l’impiego di registri addizionali, occorre servirsi dello 
stack come memoria provvisoria per il contenuto dei registri che la 
subroutine utilizzerà. Con l’esecuzione dell’istruzione RET al termine di 
TTYOUT, TEA ritornerà all’istruzione memorizzata subito dopo la 
chiamata CALL di IOO. 

La maggior parte dei dispositivi periferici, purtroppo, necessiterà di 
subroutine di I/O più lunghe e complesse di quelle già comprese in TEA, 
che sono, invece, corte e compatte per la semplice ragione che una 
tastiera di telescrivente ed un lettore di banda consistono in pratica nello 
stesso dispositivo, esattamente come la stampante e la perforazione di 
banda di una telescrivente. 
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In base al listing delle subroutine di I/O contenute internamente a 
TEA, è facile osservare come debbano essere configurate le eventuali 
subroutine di I/O differenti, quali siano i registri che si possono utiliz¬ 
zare e quale debba essere il loro contenuto al momento della chiamata 
della subroutine e a quello del ritorno da essa. Tutto questo dovrebbe 
facilitare grandemente la compilazione di nuove subroutine di I/O. 


MODIFICA DELLA TABELLA DI SALTO DI I/O 

Negli Esempi 3-5 (ottale) e 3-6 (esadecimale) è riportata la tabella di 
salto che TEA trascrive in memoria R/W subito dopo essere stato 
avviato. L’impiego di questa tabella di salto è fondamentale allorché 
l’unico dispositivo di I/O consiste in una telescrivente dotata di un 
lettore/perforati ice di banda. 

Dovendo eseguire una delle subroutine di I/O, TEA chiama una delle 
istruzioni memorizzate agli indirizzi IOTEST, IONOEC, IOECHO, 
IOP, IOR o IOO. Allorché giunge ad una di queste sei “subroutine”, 
l’8080 salta immediatamente a delle subroutine contenute all’interno di 


Esemplo 3-5. La tabella di salto generata e utilizzata da TEA (ottale). 






•030 000 

030 

000 

303 

iotest. 

JKP 

/GET THE IMPIT DEVILE 

030 

001 

121 


INCHK 

/DATA ready flag 

030 

002 

006 


0 


030 

0 0.3 

303 

IONOEC, 

JMP 

/INPUT A TTY or* CRT. CHARACTER 

030 

004 

152 


TTY1 

/INTO A « b, bl 7 MO ECHO ! 

030 

005 

006 


0 


030 

006 

303 

IOECHO, 

JMP 

/1NPIT M CHARACTER INTO A * b 

030 

0 07 

166 


TTYIM 

/lì IT ECHO IT ON THE PRINTER. 

030 

0 10 

006 


0 


030 

0 1 1 

303 

IOP, 

JMP 

/ PINCH 01*7 THE LHAPACTEf IN A 

030 

0 12 

17 1 


TTYOl'T 

/THIS CO IL b bE A TTY PUNCH OH 

030 

0 13 

006 


0 

/MICIO CASSETTE 

030 

0 14 

303 

ior. 

JMP 

/READ A CHARACTER I ITO A*b 

030 

0 15 

126 


IORLR 

/FFiOM A TTY REAbER OF< Al LIO CASSETTE 

030 

0 16 

006 


0 


030 

017 

303 

IOO, 

jm£ 

/PPIMT THE CHAP-ACTEP CONTAI ! ED IN A. 

030 

020 

17 1 


TTYOl'T 

/THIS COVLL DE A CRT, TTY OR CASSETTE. 

030 

021 

006 


0 



Esemplo 3-6. La tabella di salto generata e utilizzata da TEA (esadecimale). 






•030 000 

18 

00 

C3 

IOTEST, 

JMP 

/GET THE INPUT DEVI CE 

18 

01 

51 


INCHK 

/DATA READY FLAG 

18 

02 

06 


0 


18 

03 

C3 

IONOEC, 

JMP 

/INPUT A TTY OR CRT CHmRaCTER 

18 

04 

6A 


TTY 1 

/INTO A * b, bl'T NO ECHO l 

18 

05 

06 


Ù 


18 

06 

C3 

IOECHO, 

JMP 

/INPUT A CHARACTER INTO A * B 

18 

07 

76 


TTY IN 

/bl'T ECHO IT ON THE PRINTER. 

18 

08 

06 


0 


18 

09 

C3 

IOP, 

JMP 

/PUNCH OUT THE CHARACTER IN A 

18 

0A 

79 


TTYOl'T 

/THIS COULb BE A TTY PUNCH OR 

18 

Ob 

06 


0 

/AUDIO CASSETTE 

18 

OC 

C3 

IOR, 

JMP 

/READ A CHARACTER I-JTO A*b 

18 

OD 

56 


IORDR 

/FROM A TTY READER OR AUDIO CASSETTE 

18 

0E 

06 


0 


18 

0F 

C3 

100, 

JMP 

/PRINT THE CHARACTER CONTAINED IN A. 

18 

10 

79 


TTYOL'T 

/THIS COULD bE A CRT, TTY OR CASSETTE- 

18 

1 1 

06 


0 
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CALL 

IOTEST 

O 


INCHK, 

IN 


• 


• 


RET 


IOTEST, JMP 
INCHK 
0 


TEA 


Jump Table 


Flg. 3-1. Procedura di, accesso alla subroutlne IOTEST (INCHK), contenuta In 
TEA, con II tramite della tabella di salto. 


TEA. Effettuata l’operazione di I/O opportuna, si ha l’esecuzione dell’i¬ 
struzione RET (oppure di un’istruzione di ritorno condizionato), per cui 
il controllo del programma ritorna all’istruzione memorizzata subito 
dopo la chiamata di IOTEST, IONOEC, IOECHO, IOP, IOR oIOO 
(Fig. 3-1). 

La tabella di salto indirizza TEA alla subroutine di I/O appropriate. 
Sostituendo indirizzi diversi a quelli delle istruzioni di salto della tabella, 
si può far sì che TEA acceda a nuove subroutine di I/O ed a nuovi 
dispositivi di I/O interfacciati a cura dell’utente con il suo microcompu¬ 
ter basato sull’8080, 8085 o Z80. (Fig. 3-2) 

La conoscenza dei principi su cui si basa la tabella di salto e dei registri 
che possono o meno essere utilizzati è di grande importanza. Anche se 
può rendersi necessario l’impiego di indirizzi di dispositivo diversi da 
quelli, 000 e 001, utilizzati nelle subroutine di I/O anche se le posizioni 
dei bit della parola di stato (status word) riservate come indicatori dello 
stato dei flag di dati disponibili e di trasmettitore pronto possono 
variare, i criteri di trasferimento dei dati e di controllo mediante flag 
sono sempre gli stessi. 

Si immagini di volere porre in ingresso a TEA da un lettore di banda 
ultra-veloce un programma sorgente che deve poi essere assemblato. Nel 
corso della seconda passata dell’assembler, il programma oggetto deve 
essere posto in uscita verso un registratore a cassette e, nel corso della 
terza passata, il listing del programma assemblato deve essere stampato 
su di una stampante di telescrivente. Si può allora utilizzare la tabella di 
salto riportata nell’Esempio 3-7. 
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CALL 

IOTEST 

0 







TEA 


IOTEST, JMP 

J 

USER 


0 



Jump Table 


USER, IN 

M 


• 


• 


• 


RET 



User SuppNed 

INCHK 

Subroutine 


Fig. 3-2. Modalità di accaaao ad una aubroutlne IOTEST (INCHK) predisposta 

dall'utente. 

L’esame dell’Esempio 3-7 dovrebbe mettere bene in evidenza come sia 
stato necessario cambiare il secondo e terzo byte delle istruzioni di salto 
relative ai dispositivi IOP e IOR. Il dispositivo IOP è, in questo caso, un 
registratore a cassette anziché una perforatrice di banda di una telescri- 

Esemplo 3-7. Modifica della tabella di salto per poterla utilizzare con un 
registratore a cassette ed un lettore di nastro ad elevata velocità. 


•030 000 


030 

000 

303 

IOTEST, 

JMP 

/GET THE INPUT DEVI CE 

030 

001 

121 


INCHK 

/DATA READY FLAG 


030 

0 02 

006 


0 



030 

003 

303 

IONOEC, 

JMP 

/INPUT A TTY OR CRT 

CHARACTER 

030 

004 

152 


TTYI 

/INTO A * fa, faUT NO 

ECHO 1 

030 

005 

006 


0 

• 


030 

006 

303 

IOECHO, 

JMP 

/INPUT A CHARACTER INTO A A fa 

030 

007 

166 


TTYIN 

/faUT ECHO IT ON THE 

PRINTER. 

030 

010 

006 


0 



030 

01 1 

303 

IOP, 

JMP 

/THE *PINCH DEVI CE" 

IS NOV 

030 

012 

306 


CASSV 

/AM AUDIO CASSETTE 


030 

013 

123 


0 



030 

014 

303 

IOR, 

JMP 

/THE "READER DEVICE" 

IS NOV 

030 

0 15 

256 


HSR 

/A HIGH SPEED PAPER 

TAPE 

030 

016 

124 


0 

/READER 


030 

017 

303 

100, 

JMP 

/PRINT THE CHARACTER 

CONTAINED IN A. 

030 

020 

17 1 


TTYOUT 

/THIS COULD faE A CRT 

, TTY OR CASSETTE. 

030 

021 

006 


0 
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vente. L’indirizzo corrispondente al secondo e terzo byte dell’istruzione 
di salto è stato cambiato da 006 171 (0679 hex) in 123 306 (53C6 hex). 
L’indirizzo costituito dal secondo e terzo byte dell’istruzione di salto per 
il dispositivo IOR è stato anch’esso cambiato da 006 126 (0656 hex) a 124 
256 (54AE hex), in modo che la lettera del programma sorgente avvenga 
su un lettore di banda ultraveloce anziché su quello della telescrivente. 

È ovvio che cambiare soltanto il secondo e il terzo byte delle istruzioni 
di salto non basta: occorre scrivere le nuove subroutine di I/O e quindi 
memorizzarle. Con le variazioni apportate alla tabella di salto, la nuova 
subroutine IOP deve essere memorizzata a partire dalla locazione 123 
306 (53C6 hex) e la nuova subroutine IOR a partire dalla locazione 124 
256 (54AE hex). Queste sono subroutine appositamente scritte dall'utente 
per tali dispositivi di I/O. Esse devono essere conformi alle specifiche 
sottolineate nelle prime sezioni di questo capitolo. 

Si supponga ora di non disporre di una telescrivente e di volere, in 
alternativa, servirsi di TEA con un CRT e un registratore a cassette. La 
tabella di salto può essere modificata come risulta dall’Esempio 3-8. 

Le subroutine KYCHK, KEYIN e KEYIN2 non sono altro che le 
subroutine scritte per la tastiera del CRT, sulla falsa riga delle subroutine 
IOTEST, IONOEC e IOECHO. Gli indirizzi simbolici CASSW e 
CASSR costituiscono gli indirizzi simbolici corrispondenti rispettiva¬ 
mente alla subroutine di lettura e a quella di scrittura di un carattere da e 
su cassetta. L’indirizzo simbolico CRTOUT fa riferimento alla subrou¬ 
tine di I/O che stampa “un carattere sullo schermo del CRT. Uno dei 
compiti principali che si richiedono alla subroutine IOO (o alla sua 
equivalente) è di non limitarsi a stampare il carattere contenuto nel 
registro A, ma altresì di ispezionare la tastiera per scoprire l’eventuale 
introduzione di un CTRL/C. Il motivo per cui la tastiera deve essere 
tenuta in osservazione alla ricerca di un CTRL/C dipende dal fatto che 
la formazione del listing in base al comando L (LIST) dell’editor e la sua 
riproduzione da parte dell’assembler in fase di terza passata devono 
poter essere interrotte in qualsiasi momento. Anche se non è detto che 

Esemplo 3-8. Modifica della tabella di salto per poterla utilizzare con un 
registratore a cassette ed un CRT. 


•030 000 


030 

000 

303 

IOTEST# 

JMP 

/CHECK THE CRT 'S KEYbOARD 

03C 

00 1 

032 


KYCHK 


030 

002 

100 


0 


030 

003 

303 

IONOEC# 

JMP 

/VAI T FOR THE KEYbOARD # S FEAG, INPUT 

030 

004 

076 


KEYIN 

/THE KEY CODE. DO NOT PRIMT THE 

030 

005 

100 


0 

/CHARACTER 

030 

006 

303 

IOECHO# 

JMP 

/VÀI T FOR THE KEYbOARD 'S FLAG, INPUT 

030 

007 

1 07 


KEYIN2 

/THE KEY CODE AND PRINT THE CHARACTER 

030 

010 

100 


(l 


030 

01 1 

303 

IOP# 

JMP 

/THE PUNCH DEVI CE IS NOV AN 

030 

0 12 

306 


CASSW 

/AUDIO CASSETTE 

030 

0 13 

123 


0 


030 

0 14 

303 

IOR# 

JMP 

/THE READER DEVI CE IS NOV 

030 

0 15 

374 


CASSR 

/AN AUDIO CASSETTE 

030 

0 16 

123 


0 


030 

0 17 

303 

IOO# 

JMP 

/THE OUTPUT DEVI CE IS NOV 

030 

020 

166 


CRTOUT 

/A CRT. 

030 

02 1 

100 


0 
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nella nuova subroutine IOO questi passi siano presenti, è pur vero che la 
maggior parte delle nuove subroutine IOO li prevede. 

Cambiamento degli Indirizzi nella Tabella di Salto 

Allorché TEA è avviato nella fase iniziale, esso comincia con il creare 
in memoria R/W un duplicato della tabella di salto contenuta al suo 
interno. Nel caso che sia necessario aggiungere alla tabella di salto gli 
indirizzi di nuove subroutine di I/O, queste istruzioni non devono essere 
eseguite. 

Per cambiare gli indirizzi della tabella di salto, a cominciare da 030 000 
(1800 hex), si può ricorrere ad un monitor di sistema, un debugger, un 
pannello di controllo o un lettore di banda. Detti indirizzi, tuttavia, 
devono essere cambiati solamente dopo che TEA è stato caricato in 
memoria. E evidente che se TEA è contenuto in memoria EPROM, non 
vi è alcun bisogno di provvedere al caricamento di TEA in memoria. Per 
apportare eventuali modifiche alla tabella di salto si devono, prima di 
tutto, scrivere in memoria tutte e sei le istruzioni di salto originali , a 
partire dalla locazione 030 000 (1800 hex). Queste istruzioni sono elen¬ 
cate negli Esempi 3-5 e 3-6. 

Trascritte in memoria tutte e sei le istruzioni di salto complete dei 
rispettivi indirizzi, bisogna cambiare questi indirizzi contenuti nel 
secondo e terzo byte delle istruzioni di salto in modo che corrispondano 
agli indirizzi di partenza delle nuove subroutine di I/O. Effettuati questi 
cambiamenti, occorre far partire TEA dall’indirizzo 000 030 (0018 hex). 
Facendo partire TEA da questo indirizzo, anziché da 000 000, esso non 
trascriverà più in memoria R/W la tabella di salto. Anche nel caso che 
TEA sia memorizzata in EPROM, può sempre essere cambiata la tabella 
di salto in quanto essa è anche memorizzata in memoria R/W. È 
evidente che, affinchè TEA possa funzionare correttamente, occorre che 
l’indirizzo in memoria R/W sia 030 000 (1800 hex). 

LIMITI DEL DISPOSITIVO DI I/O 

Esistono una subroutine di lettura (IOR) di uso generale ed una 
subroutine di perforazione (IOP) di uso generale. I dispositivi più 
comuni tra quelli utilizzati con queste due subroutine sono un lettore- 
/perforatrice di banda ed un registratore a cassette nel modo di funzio¬ 
namento RECORD/PLAY (registra/riproduci). L’impiego classico 
della subroutine IOR ha luogo nelle operazioni di ingresso di un pro¬ 
gramma sorgente (testo) eseguite con l’aiuto dell’editor di TEA. Dopo 
che l’utente lo ha abilitato con il comando R (READER), questo disposi¬ 
tivo può solamente leggere un programma sorgente, ossia del testo. 
Avvenuta l’edizione del programma sorgente o del testo tramite l’editor, 
esso può essere riposto sul dispositivo IOP valendosi del comando P 
(PUNCH). Com’è noto il dispositivo IOP può essere utilizzato per 
conservare una linea, un gruppo di linee o il contenuto dell’intero text 
buffer. 

L’impiego delle subroutine IOR e IOP interessa anche l’assembler. Il 
dispositivo IOP è utilizzato nel corso della seconda passata dell’assem- 
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bler, allorché si genera la versione oggetto del programma sorgente che è 
poi posta in uscita verso il dispositivo IOP. Il dispositivo IOR è invece 
utilizzato dall’assembler quando il programma sorgente può essere con¬ 
tenuto al completo in memoria R/W. Questo fatto comporta che l’as- 
sembler effettua la lettura di una linea del programma sorgente dal 
dispositivo IOR provvedendo quindi ad elaborarla. Terminato con una 
linea del programma sorgente, l’assembler passa a leggere dal disposi¬ 
tivo IOR un’altra linea del programma sorgente, la elabora e via di 
questo passo. 

A seconda della particolarità del registratore a cassette o del lettore di 
banda perforata a disposizione, può avvenire che il funzionamento in 
questo modo intermittente non sia possibile. Nelle normali telescriventi 
esiste già un relè di controllo lettura adibito proprio a questo compito. 
Nel caso che la telescrivente di cui si dispone sia sprovvista di un relè di 
controllo lettura, la sua aggiunta non comporta problemi nè tecnici nè di 
spesa. 

Qualunque dispositivo che possa essere utilizzato per leggere una 
banda del programma sorgente per volta si presta senza problemi a porre 
in ingresso al calcolatore il programma sorgente nel corso del procedi¬ 
mento di assemblaggio. Questa possibilità esiste sempre purché ci si 
ricordi di introdurre un “T” di risposta alla domanda “M OR T?”, 
mentre è in corso l’esecuzione dell’assembler (comando X o ASSEM¬ 
BLEE). Purtroppo alla maggior parte dei registratori a cassette manca 
proprio questa capacità. Dopo aver letto una linea del testo, il registra¬ 
tore dovrebbe fermarsi, aspettando che l’assembler faccia richiesta di 
un’altra linea di programma sorgente. Esistono, d’altronde, telescri¬ 
venti, registratore digitale e lettori di banda perforata che sono dotati di 
questa capacità, ma se il dispositivo IOR di cui si dispone ne è sprovvisto, 
è gioco forza accontentarsi di utilizzare il modo di assemble M, ossia il 
modo di memoria. 
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APPENDICE A 


Formato della banda 
per il programma TEA 


Il formato della banda perforata è il seguente: 



Il canale 8 (se è l’unico canale perforato) costituisce il leader/trailer 
(LDR, TRLR; 200 ottale ovvero 80 esadecimale). 

Quando è perforato soltanto il canale 7, le quattro configurazioni che 
seguono (parole) costituiscono un’informazione relativa ad un indirizzo. 
Le parole che rappresentano i dati e le informazioni relative agli indirizzi 
sono spezzate in due byte, il primo dei quali di 2 bit e l’altro di 6 bit. 
Perciò il numero 127 (57 esadecimale) si presenterebbe nella forma sotto 
riportata: 


01 010 111=01 010111 
0101 0111=01 010111 
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• • • 


01 

010111 



Il seguente nastro è perforato sia con codici di indirizzo che di dati. Un 
indirizzo pari a 002 321 (02 DI esadecimale) sarebbe: 


002 = 00 000 010 = 00 000010 
321 = 11 010 001 = 11 010001 
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02 = 0000 0010 = 00 000010 
DI = 1101 0001 = 11 010001 





LEADERllOR) 


ADDRESS FLAG 

00 HI ADDRESS 
000010 

1 1 LO ADDRESS 
010001 

00 DATA 
000000 

01 DATA 

nono 

COMPRESUM FLAG 

01 COMPARESUM 
001001 


TRAILER (TRLR) 
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APPENDICE B 


Modifica del comando Z 


Come già si è avuto occasione di osservare, volendo passare il con¬ 
trollo del programma ad un monitor di sistema o ad un debugger ci si 
può valere del comando Z. Comunque, dato che il comando Z è presente 
in una configurazione appartenente a TEA, il microprocessore non fa 
altro che restituire il controllo del programma all’inizio di TEA in 
corrispondenza della locazione di memoria 000 030 (0018 hex). All’in¬ 
troduzione del comando M (MEMORY), il controllo del programma è 
anch’esso trasferito a questo punto di TEA. Ne risulta che, se si desidera 
trasferire il controllo ad un monitor di sistema o un debugger, occorre 
cambiare l’indirizzo a cui salta l’8080, 8085 o Z80. 

L’indirizzo della locazione di memoria alla quale salta il microproces¬ 
sore allorché si introduce in comando Z si trova memorizzato nelle 
locazioni di memoria 000 313 e 000 314 (00CB e OOCC hex). L'utente 
deve, perciò, memorizzare il byte basso del nuovo indirizzo a cui il micro- 
processore dovrà saltare nella locazione di memoria 000 313 (00CB hex) ed 
il byte alto del nuovo indirizzo alla locazione di memoria 000 314 (OOCC 
hex). Questo cambiamento può essere effettuato in un qualsiasi 
momento prima dell’esecuzione di TEA. 

Avendo provveduto alla modifica dell’indirizzo, il microprocessore 
esegue un salto alla locazione di memoria specificata dall’utente al 
momento dell’introduzione del comando Z. Una volta eseguito il moni¬ 
tor di sistema o il debugger, uno di questi programmi può essere utiliz¬ 
zato per ripassare il controllo a TEA. Nel “saltare indietro” a TEA 
occorre procedere con attenzione, soprattutto nel caso che sia stata 
modificata la tabella di salto residente in memoria R/W. In quest’ultimo 
caso è necessario accertarsi che il salto avvenga nella locazione di 
memoria 000 030 (0018 hex) e non a quella 000 000 (0000 hex). 
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APPENDICE C 


Aggiunta a TEA 
di un comando 
speciale dell’utente 


Se lo si desidera, l’impiego del comando Z può servire a trasferire il 
controllo ad una nuova sezione di TEA o ad un’altro programma voluto 
dall’utente. Il comando Z non deve, in questo caso, essere utilizzato per 
trasferire il controllo del programma ad un monitor di sistema o ad un 
debugger. TEA comunque è stato scritto in modo che non soltanto sia 
possibile “personalizzare” il comando Z, ma sia anche possibile aggiun¬ 
gere un nuovo comando. Tale nuovo comando può essere definito sotto 
specie di qualunque carattere singolo, che non sia uno di quelli già usati per 
i comandi di TEA. I caratteri che non possono essere usati per il nuovo 
comando sono A, B, C, D, E, H, I, L, M, N, O, P, Q, R, S, X e Z. Può 
dunque essere usato qualunque carattere che non sia compreso tra 
questi. Una volta deciso quale sia il carattere che rappresenta il nuovo 
comando, il codice ASCII a 7 bit del carattere deve essere memorizzato 
nella locazione di memoria 021 361 (UFI hex). Per aggiungere, ad 
esempio, il comando J, si deve memorizzare un 112 (4A hex) in questa 
locazioni di memoria. 

Con l’introduzione del nuovo comando è altresì necessario memoriz¬ 
zare un’istruzione di salto in cui il secondo e terzo byte dell’istruzione 
stessa rappresentano la locazione di memoria alla quale si desidera 
trasferire il controllo. A questo effetto si deve memorizzare un 303 (C3 
hex) alla locazione di memoria 000 320 (00D0 hex). Il byte basso dell’in¬ 
dirizzo di 16 bit deve quindi essere memorizzato in 000 321 (00D1 hex) e 
quello alto in 000 322 (00D2 hex). Una volta provveduto a ciò, il 
microprocessore salterà alla locazione di memoria specificata dall’istru¬ 
zione di salto in tutte le occasioni in cui si introdurrà il comando 
aggiunto a TEA da parte dell’utente. 
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Se ne deduce che l’aggiunta di un comando particolare a TEA com¬ 
porta un doppio provvedimento. Si deve, cioè, memorizzare in primo 
luogo il codice ASCII di 7 bit corrispondente al carattere che rappre¬ 
senta il comando in memoria e si deve quindi memorizzare un’istruzione 
JMP di salto a tre byte. Spetta all’utente il determinare correttamente il 
codice ASCII da memorizzare così come l’individuare il secondo e terzo 
byte dell’istruzione JMP ed il caricamento in memoria dell’istruzione a 
tre byte. 
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APPENDICE D 


Elenco riassuntivo dei 
comandi di TEA 


Comandi di controllo 


1. C=0 Predisponi TEA nel modo di funzionamento ottale. Il listing 

generato da TEA nel corso della terza passata si varrà di 
numeri ottali ed i confini di memoria stampati in base al 
comando Q saranno in numeri ottali. 

2. C=H Predisponi TEA nel modo di funzionamento esadecimale. Il 

. listing generato da TEA nel corso della terza passata si varrà 
di numeri esadecimali ed i limiti di memoria stampati in base 
al comando Q saranno in numeri esadecimali. 

3. C=M L’utilità di questo comando si evidenzia allorché si vogliono 

cambiare i limiti di memoria del buffer del testo. All’intro¬ 
duzione di questo comando TEA pone la domanda “INI- 
TIAL ADDRESS?” e “FINAL ADDRESS?” (“indirizzo 
iniziale?” e “indirizzo finale?”). Si ricordi che, se non si 
desidera che unoo l’altro di questi indirizzi sia cambiato, è 
sufficiente premere il tasto RETURN dopo che la domanda 
è stata posta. 


4. C=R La funzione di questo comando è quella di abilitare il dispo¬ 
sitivo IOR (READER) (di lettura) in modo che sia possibile 
immettere nel text buffer un testo presente sul dispositivo di 
lettura, allorché si introduce uno dei comandi A 
(APPEND), I (INSERT) oppure C (CHANGE). 
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5. C=B La funzione di questo comando è quella di permettere la 

lettura in memoria di un programma oggetto. Questo 
comando può essere introdotto in un qualunque momento 
per caricare un qualunque programma oggetto. In ogni 
caso, con la lettura in memoria del programma oggetto, si 
può avere l’alterazione del text buffer, di TEA o del suo 
stack. 

6. C=Z Introducendo questo comando, il microprocessore ritorna 

ad un monitor di sistema ovvero ad un debugger. L’impiego 
di questo comando rende indispensabile una modifica di 
TEA. Si consulti, al proposito, l’Appendice B. 

Comandi per l’Alterazione del Text Buffer 

7. C=A Aggiunge al buffer del testo la parte di testo che si trova 

dopo questo comando. Quando, all’inizio, si dà il via a 
TEA, l’introduzione di questo comando permette di comin¬ 
ciare a creare il buffer. Se in quest’ultimo vi è già presente del 
testo, l’impiego di questo comando ha la funzione di consen¬ 
tire l’aggiunta di testo in coda a quello già contenuto dal 
buffer stesso. 

8. C—I Inserisce una o più linee di testo a fronte della linea “n”. È 

necessario, in questo comando, specificare un numero di 
linee valido. Quindi si preme il tasto RETURN. 

C=15 l Inserisci il seguente tasto a fronte della 

linea cinque. 

9. C=C Sostituire la linea “n” con la (le) seguente (-i) linea (-e) di 

testo. Con questo comando occorre specificare un numero 
di linea valido. Si preme quindi il tasto RETURN. 

C=C32 1 Cambia la linea 32 in modo che essa con¬ 

tenga il seguente testo (una o più linee di 
testo). 

10. C=D La funzione di questo comando è quella di permettere di 

cancellare una o più linee di testo. Con questo comando è 
facoltativo specificare o meno uno o più numeri di linea 
validi. Quindi si preme di tasto RETURN. 

C=D127 l Cancella dal buffer la linea 127. 

C=D34-59 1 Cancella dal buffer le linee da 34 a 59 
compresa. 

C=D 1 Cancella l’intero buffer. Pur introdu¬ 

cendo il comando, il buffer non risulta 
cancellato sino a che l’utente non 
risponde Y alla domanda “ARE YOU 
SURE?” (sei certo?). 
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Comandi di Accesso al Buffer del Testo 

11. C=L La funzione di questo comando è quella di dar luogo al 

listing di una o più linee di testo. Con questo comando 
specificare uno o più numeri di linea validi è facoltativo. 
Una volta introdotto il (i) numero (-i) di linea si preme il 
tasto RETURN. 

C=L34 1 Eseguire sul dispositivo IOO il listing rela¬ 

tivo alla linea 34. 

C=L341-349 I Elenca sul dispositivo IOO le linee da 341 a 
349 compresa. 

C=L I Realizza sul dispositivo IOO il listing del¬ 

l’intero buffer. 

12. C=P La funzione di questo comando serve ad ottenere sul dispo¬ 

sitivo IOP la perforazione di una o più linee di testo. Per 
questo comando la citazione esplicita di uno o più numeri di 
linea è facoltativa. Una volta introdotto il (i) numero (-i) di 
linea si preme il tasto RETURN. 

C=P19 1 Perfora la linea 19 sul dispositivo IOP. 

C=P34-78 l Perfora sul dispositivo IOP le linee da 34 

a 78 comprese. 

C=P I Perfora sul dispositivo IOP l’intero buf¬ 

fer. 

13. C=Q La funzione di questo comando è quella di dar luogo alla 

stampa dell’ultimo indirizzo utilizzato dal buffer, dell’ul¬ 
tima locazione di memoria a disposizione del buffer e del 
numero di linee di arresto contenute nel buffer. I comandi O 
e H stabiliranno il sistema di numerazione a cui il comando 
si dovrà attenere. 

14. C=S La funzione di questo comando è quella di aiutare nella 

ricerca nel buffer di una stringa specificata dall’utente. Nel 
caso che si scopra una stringa uguale a quella cercata, segue 
la stampa dell’intera linea di testo. 

C=S=STRING (CTRL/S) Dopo che è stato introdotto S, 
TEA risponderà con un segno di uguale 
(=). Si introduce allora la “stringa cam- 
' pione”, seguita da un CTRL/S. 

15. C=N Continua la ricerca a partire dal numero di linea stampato in 

base al comando S, fino a scoprire ancora la stessa stringa 
oppure a giungere al termine del buffer. Se la stringa è 
scoperta di nuovo, si ottiene la stampa del relativo testo. 

16. C=E Scambia la stringa specificata dall’utente con la stringa 
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rinvenuta in una linea di testo. 

C=E=STRING (CTRL/E) Scambia la stringa appena 
introdotta con la stringa rinvenuta nella 
linea di testo. 

C=ES Scambia la stringa precedentemente spe¬ 

cificata mediante il comando E con la 
stringa rinvenuta nel buffer del testo. 

17. C—X Assembla il programma sorgente contenuto (1) in memoria 

oppure (2) su banda. Per ulteriori particolari si veda il 
Capitolo 2. 


130 



APPENDICE E 


Listing di TEA 


In questa appendice è riportato il listing assemblato di TEA. Valen-1 
dosi di questo listing, l’utente può caricare TEA in memoria R/W e 
programmare con esso delle EPROM. Il contenuto della locazione di 
memoria zero deve essere il primo valore da memorizzare (R/W o 
EPROM). 
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TYCHON EDITOR-ASSEMBLER V-3 


PAGE 01-001 


/TRIS IS THE TYCHON EDITOR-ASSEMBLER US ED TO 
/CREATE ASSEMBLY LAN GUADE PRO G RAM S FOR 8080- 
/AND 808S-BASED HICROCOMPUTERS. 

/COPYRIGHT 1979 

DV TBLIM 031 177 
DB LF 012 
DB CR 015 
DB TAB Oli 
DB STERM 000 
DB BTERM 233 
DB CTRLC 003 


•030 000 


18 

00 

C3 

IOTEST» 

JMP 

/GET THE INPUT DEVI CE 

18 

01 

SI 


INCHK 

/DATA READY FLAG 

18 

02 

06 


0 


18 

03 

C3 

IONOEC» 

JMP 

/INPUT A TTY OR CRT CHARACTER 

18 

04 

6A 


TTYI 

/ IN TO A « B» BUT NO ECHO 1 

18 

05 

06 


0 


18 

06 

C3 

IOECHO» 

JMP 

/INPUT A CHARACTER INTO A « B 

18 

07 

76 


TTY1N 

/BUT ECHO IT ON THE PRINTER. 

18 

08 

06 


0 


18 

09 

C3 

IOP» 

JMP 

/PUNCH OUT THE CHARACTER IN A 

18 

0A 

79 


TTYOUT 

/THIS COULD BE A TTY PUNCH OR 

18 

0B 

06 


0 

/AUDIO CASSETTE 

18 

OC 

C3 

I OR» 

JMP 

/READ A CHARACTER INTO A4B 

18 

OD 

56 


IORDR 

/FROM A TTY READER OR AUDIO CASSETTE 

18 

OE 

06 


0 


18 

or 

C3 

IOO» 

JMP 

/PRINT THE CHARACTER CONTAINED IN A. 

18 

1 0 

79 


TTYOUT 

/THIS COULD BE A CRT» TTY OR CASSETTE. 

18 

11 

06 


0 


18 

12 

00 

BYTAB» 

0 

/THIS IS THE TABLE BETVEEN 'SYMADF* 

18 

13 

00 


0 

/AND "INDRAM" FOR THE "DB* TABLE 

18 

14 

00 

HIADD» 

0 

/THIS IS THE HIGHEST ADDRESS THE 

18 

15 

00 


0 

/THE TEXT BUFFER HAS USED. 

18 

16 

00 

ADCHK» 

0 

/0 IF NO ADDR. IS DEFINED» 377 IF ONE IS 

18 

17 

00 

INITLN» 

0 

/ IN I TI AL LINE NUHBER SPECIFIED BY THE USER 

18 

18 

00 

SENSE» 

0 


18 

19 

00 

finln» 

0 

/FINAL LINE NUHBER SPECIFIED BY THE USER 

18 

IA 

00 


0 


18 

IB 

00 

ADI FF» 

0 

/DIFFERENCE BETVEEN INITLN Mi D FINLN • 1 

18 

IC 

00 


0 


18 

ID 

00 

SRCADD» 

0 

/THIS IS USED BY N» NEXT OCCURENCE 

18 

1E 

00 


0 


18 

1F 

00 

STRFHD» 

0 

/THIS IS USED BY THE SEARCH COMMAND 

18 

20 

00 

EXOK» 

0 

/THIS IS USED BY THE EXCHANGE COMMAND 

18 

21 

00 


0 


18 

22 

00 

TXTBUF» 

0 

/THE STARTING ADDRESS FOR THE 

18 

23 

00 


0 

/TEXT BUFFER. 

18 

24 

00 

EH DRAM» 

0 

/LAST AVAILABLE R-V MEMORY LOCATION 

18 

25 

00 

ENDH» 

0 

/FOR THE TEXT BUFFER 

18 

26 

00 

TMP. 

0 
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18 

27 

00 


0 


18 

28 

00 

UN IT# 

0 

/THIS IS FOR THE DECIMAL 

18 

29 

00 


0 

/LINE NUMBERS DURINO THE 

18 

2A 

00 


0 

/SEARCH ROUT1NES. 

18 

2B 

00 

THOUa 

0 


18 

2C 

00 

BLKU# 

0 

/THESE TVO MEMORY LOCATIONS ARE USEO 

18 

2D 

00 

BLKT# 

0 

/FOR THE BLOCK NUMBER CO UN TER. 

18 

2E 

00 

TFCLIN# 

0 

/TEXT. FIRST CHARACTER IN A LINE. 

18 

2F 

00 


0 


18 

30 

00 

TFMLIN# 

0 

/TEXT» FIRST MNEMONIC LETTER OF LINE 

18 

31 

00 


0 


18 

32 

oo 

LINCNT# 

0 

/THE LINE COIMTER FOR ERROR MESSAGES 

18 

33 

00 


0 


18 

34 

00 

ADDCNT# 

0 

/THE ’CURRENT ADDRESS COIWTER" 

18 

35 

00 


0 


18 

36 

00 

HN E VAL/ 

0 

/MNEMONIC VALUE 

18 

37 

01 


0 


18 

38 

00 

PAGCNT# 

0 

/THIS IS THE # OF LINES PER PAGE 

18 

39 

00 

SYNADD# 

0 

/BEGINNING ADDRESS OF THE SYMBOL TABLE. 

18 

3A 

00 


0 


18 

3B 

00 

SYMADF# 

0 

/LAST LOC. USED BY THE SYMBOL TABLE. 

18 

3C 

00 


0 


18 

3D 

00 

MORT# 

0 

/FROM MEMORY OR TAPE 7 

18 

3E 

00 

HORO/ 

0 

/HEX OR OCTAL LISTING BY TEA 

18 

3F 

00 

CHKSUM# 

0 

/CHECKSUM FOR PASS 2 OF THE ASSEMBLER 

18 

40 

00 

RORK# 

0 

/READER OR KEYBOARD INPUT TO THE EDITOR 

18 

41 

00 

PORLA 

0 

/5ENSE REGI STER FOR PU0CH OR LIST 

18 

42 

00 

PASS# 

0 

/NUMBER OF THE PASS BEING PER FORM ED 

18 

43 

00 

REG# 

0 

/SAVE THE H4L POINTERS TO THE REGI STER 

18 

44 

00 


0 


18 

45 

00 

TMPADD# 

0 


18 

46 

00 


0 


18 

47 

00 

PAGNMB# 

0 

/CURRENT PAGE NUMBER FOR L1STINGS 

18 

48 

00 

NNBERR# 

0 

/NUMBER OF ERRORS ENCOUNTERED ( 1-256) 

18 

49 

00 

HTCHR# 

0 

/FOR ALPHABETIZING THE SYMBOL TABLE. 

18 

4A 

00 

BFUN 1 T# 

0 

/THESE 4 MEMORY LOCATIONS ARE USED TO 

18 

4B 

00 

BFTfN# 

0 

/STORE THE BCD LINE NUMBER THAT IS 

18 

4C 

00 

BFHUN# 

0 

/PR1NTED OUT BY THE EDITOR DURINO THE 

18 

4D 

00 

BFTHOU# 

0 

/APPEND. INSERT» CHANGE AND LIST CMDS. 

18 

4E 

00 

STRING# 

0 

/SEARCH STRING. UP TO 16 CHARACTERS. 





•030 

144 

18 

64 

00 

EXSTR# 

0 

/THE EXCHANGE STRING IS STORED HERE 





•030 

240 

18 

A0 

00 

STACK# 

0 

/THE STACK POINTER STARTS HERE. 





•030 

250 

18 

A8 

00 

BUFF2# 

0 

/THIS IS THE 1 LINE TEXT BUFFER 
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•000 000 


00 

01 

00 

START. 

NOP 

/THESE MEMORY LOCATIOMS ARE FDR 

00 

01 

00 


NOP 

/«IY USART INITIAL1ZATION 

00 

02 

00 


MOP 

/1NSTRUCTIOMS 

00 

03 

00 


MOP 


01 

04 

00 


MOP 


00 

05 

00 


MOP 


00 

06 

00 


MOP 


00 

07 

00 


MOP 


00 

08 

21 


LX1H 

/DUPLICATE THE I/O TABLE VITHIN 

00 

09 

AS 


10TAB 

/TEA 1M R-V MEMORY STARTIMG FROM *10TEST' 

00 

0A 

07 


0 


oo 

0B 

11 


LXID 

/D4E POINT TO THE DESTIMATIOM 

00 

oc 

00 


10TEST 


00 

OD 

18 


0 


00 

OE 

06 


M VI B 

/MUNBER OF BYTES TO TRANSFER 

00 

OF 

12 


022 

/ 022 ■ 18 DEC1MAL <6 1/0 ROUT1MES) 

00 

IO 

7 E 

IOTRAN. 

MOVAM 

/GET THE DATA 

00 

11 

12 


STAXD 

/STORE IT 

oo 

12 

23 


IMXH 


00 

1 3 

13 


INXD 

/IMCREHENT THE POIMTERS 

00 

14 

OS 


DCRB 

/DOME ALL 18 MEMORY LOCATIOMS 7 

00 

15 

C2 


JNZ 

/NO. MOVE AMOTHER VALUE 

00 

16 

IO 


10TRAN 


00 

17 

00 


0 


00 

18 

31 

STARTI. 

LXISP 

/LOAD THE STACK POINTER VITH A 

00 

19 

AO 


STACK 

/R/V MEMORY ADDRESS 

00 

1A 

18 


0 


00 

1B 

2A 

IADRIN. 

LHLD 

/GET VHATEVER ADDRESS 1S STORED 

00 

1C 

22 


txtbuf 

/AS THE IN1TIAL ADDRESS OF THE 

oo 

1D 

18 


0 

/TEXT BUFFER 

00 

IE 

EB 


XCHG 

/GET IT INTO D4E. 

00 

ir 

IB 


DCXD 

/DECREMENT IT BY ONE 

00 

20 

21 


LXIH 

/LOAD H4L VITH THE ADDRESS OF 

00 

21 

3C 


IA 

/THE MESSAGE * IN 1 TI AL ADDRESS 7' 

00 

22 

12 


0 


00 

23 

CD 


CALL 

/PRINT "IMITIAL ADDRESS*. GET AM OCTAL O 

00 

24 

D4 


ADCMX 1 

/ H EX IN 1 TI AL ADDRESS AND CHECK 

00 

25 

00 


0 

/ITS VALIDITY. 

00 

26 

EB 


XCHG 

/ADDRESS IS VALI D. GET IT INTO H4L 

00 

27 

36 


MV1M 

/SAVE A CARRIAGE RETURN AT THIS ADDRESS 

00 

28 

OD 


CR 


00 

29 

23 


IMXH 

/ INCREMENT THE ADDRESS 

00 

2A 

22 


SHLD 

/SAVE THE ADDRESS AS THE BEG1MN1NG 

00 

2B 

22 


TXTBUF 

/OF THE TEXT BUFFER 

00 

2C 

18 


0 


00 

2D 

2A 

FADR1N. 

LHLD 

/LOAD H4L VITH ANY PREVIOUS FINAL 

00 

2E 

24 


EN DRAM 

/ADDRESS 

00 

2F 

18 


0 


00 

30 

EB 


XCHG 

/PUT IT INTO DA E 

00 

31 

21 


LXIH 

/LOAD HAL VITH THE ADDRESS FOR THE 

00 

32 

SI 


FA 

/"FINAL ADDRESS" 

00 

33 

12 


0 


00 

34 

CD 


CALL 

/PRINT THE MESSAGE. GET Mi ADDRESS 
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00 

35 

DA 


ADCKX1 

/AND CHECK ITS VALI DI TY 

00 

36 

00 


1 


0» 

37 

2A 


LHLD 

/NOV MAKE SURE THAT ITS GREATER 

00 

38 

22 


TXTBUF 

/THAN THE INITIAL ADDRESS OF 

00 

39 

18 


0 

/THE TEXT BUFFER 

00 

3A 

7D 


NO VAL 


00 

3B 

93 


SUBE 


00 

3C 

7C 


HO VAX 


00 

3D 

9A 


SBBD 


00 

3E 

D2 


JNC 

/DIE 1S NOT GREATER THAN HAL 

00 

3F 

2D 


FADR1N 

/SO GET ANOTHER FINAL ADDRESS 

00 

Al 

00 


0 


00 

Al 

EB 


XCHG 


00 

A2 

22 


SHLD 


• 0 

A3 

2A 


IN DRAM 

/SAVE THE LAST R-V LOCATION IN “DIDRAM* 

00 

AA 

18 


0 


00 

A5 

AF 


XRAA 

/SET THE RORK SV1TCH (READER OR 

00 

A6 

32 


STA 

/KEYBOARD) TO KEYBOARD ENTRY 

00 

A7 

A0 


RORK 

/(BY MEANS OF THE ÌONOEC DEVI CE) 

00 

A8 

18 


0 


00 

A9 

21 

YESNO» 

LXIH 


00 

AA 

n 


SCIH 

/PRINT THE MESSAGE 

00 

AB 

u 


0 

/“SOURCE CONTAINED IN MEMORY 7- 

00 

AC 

CD 


CALL 


00 

AD 

7A 


70 UT 


00 

AE 

OS 


0 


00 

AF 

CD 


CALL 


00 

SI 

06 


IOECHO 

/GET A CHARACTER V1TH ECHO 

00 

SI 

18 


1 


00 

52 

FE 


CP1 


00 

53 

59 


•Y* 

/IF ANSVER IS YES» GO TO “NOTY" 

00 

5A 

C2 


JNZ 

/NOT A *Y“» IS IT AN "N“7 

00 

55 

61 


NOTY 


00 

56 

00 


• 


00 

57 

CD 


CALL 

/THERE IS A PROGRAM IN MEMORY» 

(0 

58 

26 


CNTLN 

/SO COUNT THE N UH BER OF LINES 

00 

59 

01 


1 


00 

SA 

22 


SHLD 

/AND SAVE THE HIGHEST ADDRESS USED 

00 

SB 

1A 


HIADD 

/BY THE PROGRAM. 

00 

5C 

18 


1 


10 

SD 

C3 


JNP 

/THEN PRINT *C-“. 

II 

5E 

71 


QUEST 1 


II 

5F 

II 


• 


II 

61 

FE 

NOTY. 

CPi 

/NOT A *Y“» IS IT AN “N*7 

II 

61 

AE 


-N" 

/MAS A N FOR NO 

00 

62 

C2 


JNZ 

/IT VAS NEITHER» TRY AGAIN 

II 

63 

A9 


YESNO 


II 

6A 

II 


• 


01 

65 

CD 

DO. ALL» 

CALL 

/THE ANSVER VAS *N* FOR NO» SO RESET 

IO 

66 

2C 


CLEAN . 

/A N UH BER OF POINTERS AND THEN 

01 

67 

16 


0 


II 

68 

C3 


JNP 

/GET A USER COMM AND. 

01 

69 

71 


QUESTI 


II 

6A 

II 


1 
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00 

6B 

3E 

QUEST* 

M VI A 

/TYPE A *7* 

(0 

6C 

3 F 


*?- 


(0 

6D 

CD 


CALL 


(0 

6E 

0 F 


100 


00 

tr 

18 


0 


00 

71 

21 

QUESTI* 

LXIH 

/LOAD H4L VITH THE ADDRESS OF THE 

00 

71 

64 


CEQ 

/MESSAGE 'C«* 

00 

72 

12 


0 


00 

73 

CD 


CALL 

/PRINT THE 'O' 

00 

74 

7A 


TOUT 


00 

75 

05 


0 


(0 

76 

3E 

GETCHR* 

M VI A 

/INITIALIZE THE MEMORY LOCATION "SENSE" 

00 

77 

CO 


300 

/TO 300. THIS IS US ED BY THE 'INPUT' 

00 

78 

32 


STA 

/SUBROUTINE TO DETERMINE IF NO* ONE 

00 

79 

18 


SENSE 

/OR TVO LINE NUMBERS VERE ENTERED. 

00 

7A 

18 


1 


00 

7B 

3E 


M VIA 


00 

7C 

4C 


•L* 


00 

7 D 

32 


STA 

/SET THE PIMCH/L1ST DEVICE 

IO 

7E 

41 


PORL 

/TO LIST 

01 

7F 

18 


0 


00 

80 

CD 

C1MDEC* 

CALL 

/C-ET A USER COMMAND 

IO 

81 

06 


10ECH0 

/AND THEN 'DECODE' IT. 

IO 

82 

18 


0 


00 

83 

21 


LXIH 

/SET H4L TO THE ASCII CHARACTER TABLE. 

IO 

84 

EO 


CMDTAB 


• 0 

SS 

11 


1 

t 

oo 

86 

11 


LXID 

/SET DIE TO THE TABLE OF JUMP ADDRESSES 

00 

87 

9D 


CMDJMP 


II 

88 

00 


0 


00 

89 

7 E 

NXTCMD* 

MOVAM 

/GET AN ASCII TABLE CHARACTER 

00 

8A 

FE 


CPI 


00 

8B 

00 


000 

/END OF THE TABLE 7 

IO 

8C 

78 


MOVAB 

/IOECHO RETURNS THE CHARACTER IN A « B 

00 

8D 

CA 


JZ 

/THE COMMAND IS NOT IN THE TABLE* 

00 

8E 

6B 


QUEST 

/SO PRINT A 7 AND THEN C-. 

00 

8 F 

00 


0 


00 

90 

BE 


CMPM 

/INPUT - TO THE TABLE ENTRY 7 

IO 

91 

CA 


JZ 

/YES* THEN GET THE ADDRESS TO JUMP TO 

00 

92 

9B 


CMDOX 


• 0 

93 

IO 


0 


IO 

94 

23 


INXH 

/NO* SO POINT TO THE N EXT CHARACTER 

00 

95 

13 


INXD 

/AND 1NCREMENT PAST THE JUMP IN- 

00 

96 

13 


INXD 

/STRUCTION AND THE TVO ADDRESS 

00 

97 

13 


INXD 

/BYTES 

II 

98 

C3 


JMP 


00 

99 

89 


NXTCMD 


01 

9A 

00 


0 


00 

9B 

EB 

CMDOX» 

XCHG 

/GET THE ADDRESS 1NTO HAL 

00 

9C 

E9 


PCHL 

/AND GO TO THE PRO PER ROUTINE 

00 

9D 

C3 

CMDJMP* 

JMP 


01 

9E 

20 


DEL ET 

/D-DELETE 

IO 

9F 

03 


0 
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00 

A0 

C3 

JMP 


00 

Al 

B7 

ASSEMB 

/X-ASSEMB 

00 

A2 

07 

0 


oo 

A3 

C3 

JMP 


00 

A4 

75 

LIST 

/L-LIST 

00 

A5 

02 

0 


00 

A6 

C3 

JMP 


00 

A7 

84 

FIMDIT 

/S-SEARCH 

00 

A8 

04 

0 


00 

A9 

C3 

JMP 


00 

AA 

70 

TAPE 

/P-PUNCH A TAPE 

00 

AB 

02 

0 


00 

AC 

C3 

JMP 


00 

AD 

85 

M EMO UT 

/Q*MEMORY LIMITS MD LAST LINE NUMBER 

00 

AE 

OS 

0 


00 

AF 

C3 

JMP 


00 

B0 

20 

CONSER 

/N*CONTINUE SEARCH 

00 

B1 

OS 

0 


00 

B2 

C3 

JMP 


00 

B3 

FC 

HEXOCT 

/H OR O • SET THE LOCATION HORO 

00 

B4 

00 

0 


00 

B5 

C3 

JMP 


80 

B6 

FC 

HEXOCT 

/SANE AS ABOVE 

00 

B7 

00 

0 


00 

B8 

C3 

JMP 


00 

B9 

FS 

READOK 

/SET THE APPEND» INSERT AND CHANGE 

80 

BA 

00 

0 

/INPUT TO THE READER DEVICE 

00 

BB 

C3 

JMP 


00 

BC 

03 

APPMD 

/A» APPEND 

00 

BD 

01 

0 


00 

BE 

C3 

JMP 


80 

BF 

6B 

CKANGE 

/C-CHANGE 

00 

CO 

OS 

8 


00 

CI 

C3 

JMP 


80 

cs 

6B 

IHSERT 

/I'INSERT 

08 

C3 

03 

0 


80 

C4 

C3 

JMP 


08 

CS 

9F 

EXCHG 

/E-EXCHANGE STRINGS 

00 

C6 

06 

0 


00 

C7 

C3 

JMP 


08 

CS 

18 

START 1 

/M-CHANGE MEMORY LIMITS 

00 

C9 

00 

0 


80 

CA 

C3 

JMP 

/Z-RETUIW TO THE "SYSTEM MONITOR" 

00 

CB 

18 

STARTI 

/OR "DEBUGGER* 

00 

CC 

00 

0 


00 

CD 

C3 

JMP 

/B-BOOTSTRAP; READ THE OBJECT PROGRAM 

00 

CE 

52 

BOOT 

/PRODUCED BY THE SECOND PASS OF THE 

00 

CF 

07 

8 

/ASSEMBLER INTO MEMORY 

00 

DO 

00 

0 

/ONE USER COMM AND CAN FIT IN HERE 

88 

DI 

00 

0 

/(MAXE SURE YOU ADD THE ASCII 

00 

D2 

01 

0 

/WALUE POR IT TO THE "CMDTAB" LIST» 

00 

D3 

00 

0 


88 

D4 

ES 

ADCHK1, PUSHH 

/SAVE THE MESSAGE ADDRESS 
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00 

D5 

CD 


CALL 

/PRINT THE MESSAGE 

00 

D6 

7A 


TOUT 


00 

D7 

05 


0 


00 

db 

El 


POPH 

/GET THE MESSAGE ADDRESS BACH 

00 

D9 

CD 


CALL 

/GET AN OCTAL OR HEX 16-BIT 

11 

DA 

EB 


ADRIN 

/ADDRESS 

00 

DB 

06 


0 


• 0 

DC 

01 


LX1B 

/LOAD BAC VITM THE 'HI* ADDRESS 

00 

DD 

7F 


TBLIN 


00 

DE 

19 


0 


00 

d r 

CD 


CALL 


01 

E0 

F0 


BCMDE 

/THEN SUBTRACT DIE FROM BAC 

00 

E! 

00 


0 


IO 

£2 

D8 


RC 

/DAE » BAC# SO RETURN 

00 

E3 

01 


LX18 

/BAC > DAE# SO SEE 1F DAE IS LESS 

00 

ZA 

00 


START 

/THAN THE START1NG ADDRESS OF 

00 

za 

00 


0 

/TEA 

00 

E6 

CD 


CALL 

/SUBTRACT DAE FROM BAC 

00 

E7 

FO 


BCMDE 


00 

E8 

00 


1 


00 

E9 

DA 


JC 

/THE ADDRESS IN DAE IS LESS THAN 'TBLIN* 

00 

EA 

DA 


ADCHKI 

/BUT EQUAL TO OR GREATER THAN 'START#* 

M 

EB 

00 


0 

/SO GET ANOTHER ADDRESS. 

00 

EC 

CA 


JZ 


00 

ED 

DA 


ADCKK1 


00 

EE 

00 


1 


00 

EF 

C9 


RET 


00 

F0 

79 

BOI DEs 

HOVAC 

/GET AN LSBY INTO THE A REGI STER 

00 

FI 

93 


SUBE 

/SUBTRACT THE LSBY IN E 

00 

F2 

78 


MOVAB 

/GET THE MSBY IN B 

00 

F3 

9A 


SBBD 

/SUBTRACT-VITH-BORROV THE MSBY 

00 

FA 

C9 


RET 

/IN D AND RETURN. 

00 

F5 

78 

READOK# 

MOVAB 

/SET THE “RORK ' REGI STER TO 

IO 

F6 

32 


STA 

/THE 'READER* MODE FOR 

00 

F7 

A0 


RORK 

/THE A# C AND I COMM AN DS 

00 

F8 

18 


0 


00 

n 

C3 


JMP 


00 

FA 

70 


QUESTI 


01 

FB 

00 


0 


00 

FC 

78 

HEXOCT# 

MOVAB 

/SAVE THE O OR H (ASCII CODE) IN THE 

00 

F D 

32 


STA 


00 

F E 

3E 


HORO 

/MEMORY LOCATION 'HORO* 

00 

FF 

18 


0 


01 

01 

C3 


JMP 


01 

01 

70 


QUESTI 

/TKEN GET ANOTHER USER COMMAND 

11 

02 

00 


0 
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/THE APPEND COMHAND IS USED TO CREATE AN IH 1 TI AL 
/TEXT BUFFER. VHEN VE START “TEA" THERE IS NO 
/TEXT BUFFER. SO WE APPEND NEW TEXT. 


01 

03 

CD 

APPEND. 

C ALL 

/TYPE A CR AND LF 

01 

04 

39 


CRLF 


01 

05 

02 


0 


01 

06 

CD 


C ALL 


01 

07 

26 


CNTLN 

/ CO IN T THE NUMBER OF LINES IN 

0 1 

08 

01 


0 

/THE TEXT BUFFER 

01 

09 

CD 

A END. 

C ALL 

/GET ONE LINE OF TEXT IN THE 

01 

0A 

3C 


ONELN 

/MINI-TDCT BUFFER 

01 

0B 

01 


0 


01 

OC 

2A 


LKLD 

/NOV TRANSFER THE CONTINTS OF THE 

01 

OD 

14 


H1ADD 

/NINI-BUFFER TO THE MAIN TEXT BUFFER. 

01 

0E 

18 


0 


01 

0F 

11 


LXID 


01 

10 

A8 


BUFFE 


01 

11 

16 


0 


01 

12 

1A 

SAVBUF. 

LDAXD 

/GET A CHARACTER FRON THE NINI-BUFFER 

01 

13 

re 


CP1 

/AT THE IND OF THE NINI-BUFFER YET7 

01 

14 

00 


STERI 


01 

15 

CA 


JZ 

/YES. THIN SAVE THE BUFFER TERMINATOR 

01 

16 

IE 


ENDBUF 


01 

17 

01 


0 


01 

18 

77 


HOVMA 

/M D SAVE IT IN THE MAIN BUFFER 

01 

19 

13 


INXD 


01 

1A 

23 


INXH 


01 

1B 

C3 


JNP 


01 

1C 

12 


SAVBUF 


01 

ID 

01 


0 


91 

1E 

36 

ENDBUF. 

MV1H 


01 

ir 

9B 


BTERM 

/THEN SAVE A TEXT BUFFER TERIINATOR 

01 

20 

22 


SHLD 


01 

21 

14 


HIADD 


01 

22 

18 


0 


01 

23 

C3 


JNP 


01 

24 

09 


A END 

/NO. THIN GET ANOTHER LINE OF TEXT 

01 

25 

01 


0 


01 

26 

CD 

CNTLN. 

C ALL 

/SET THE BUFFER LINE COINT TO 

01 

27 

68 


BF1 

/0001 

01 

28 

04 


0 


01 

29 

2A 


LKLD 

/NOV COINT THE NUMBER OF LINES 

01 

2A 

22 


TXTBUF 

/IN THE TEXT BUFFER 

01 

2B 

18 


0 


01 

2C 

7E 

3ETOND. 

HO VAM 

/GET A CHARACTER 

01 

2D 

re 


CPI 

/AT THE IND OF THE BUFFERT 

01 

2E 

9B 


BTERM 


01 

2F 

C8 


RZ 

/YES. THIN RETURN VITH THE COINT 

01 

30 

23 


INXH 

/NO. INCRHINT THE NIMORY ADDRESS 

01 

31 

re 


CPI 

/CARRIAGE RETUH0T 

01 

32 

OD 


CR 


01 

33 

C2 


JNZ 

/NO. THIN CHECK THE NEXT CHARACTER 
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il 

34 

2C 


arroti d 


11 

35 

II 


1 


11 

36 

CD 


C ALL 

/EOIHD A CR» SO INCREHEHT THE 

11 

37 

SD 


BFLINC 

/THE BUFFER LINE 1NCREMENT SUB- 

11 

35 

14 


• 

ZI» UTINE 

II 

39 

C3 


JMP 

/THEN SET ANOTHER COMMAND 

II 

3A 

2C 


BETONO 

/FROM THE BUFFER AND TEST IT 

II 

3B 

11 


1 


01 

3C 

2A 

ONELN. 

LHLD 

/BEFORE A LINE CAN BE INPUT FROM THE 

il 

3D 

14 


H1ADD 

ZIOO DEVI CE# SEE IF TU ERE IS ANY MEMORY. 

ei 

3E 

18 


0 


oi 

3 r 

EB 


XCHG 

/HIADD IN DIE 

li 

41 

2A 


LHLD 

/BET THE ADDRESS OF THE LAST AVAILABLE 

oi 

41 

24 


ENDRAH 

/R/U MEMORY LOCATION 

il 

42 

18 


1 


01 

43 

70 


HO VAL 


01 

44 

93 


SUBE 


01 

45 

7C 


HOVAH 


II 

46 

9A 


SBBD 

/ARE VE TOO CLO SET 

II 

47 

CA 


JZ 

/YES. THEM PRINT THE *HE* ERROR 

il 

48 

96 


KM EX C 

/MESSABE 

01 

49 

16 


1 


01 

4A 

21 

ELI NE, 

LXIH 

/LOAD RESISTER PAIR H VITH THE ADDRESS 

01 

4B 

A8 


BUFF2 

/VHERE THE ONE LINE OF TEXT VILL BE 

il 

4C 

18 


1 

/STORED 

11 

40 

3A 


LDA 

/ SHO ULD VE GET THE CHARACTERS FROM 

II 

4E 

41 


RORK 

/THE •IONOEC" DEVI CE OR THE *IOR‘ 

11 

4 r 

18 


■ 

/DEVI CE? 

II 

SI 

FÉ 


CPI 


II 

51 

52 


•R“ 


11 

52 

CA 


JZ 

/IT IS AN ASCII R» GET THE TEXT 

11 

53 

43 


RDR1N 

/FROM THE *IOR* DEVI CE 

II 

54 

• 2 


0 


01 

55 

CO 


C ALL 

/IF THERE IS SOME MEMORY. PRINT THE 

01 

56 

73 


BFOUT 

/LINE NUHBER OF THE LINE TO BE 

01 

57 

14 


0 

/EH TER ED 

II 

58 

• E 

N EVTA&, 

HV1C 

/C- # OF SPACES PER TAB STOP 

01 

59 

18 


111 


01 

SA 

CD 

NXTLET. 

CALL 


II 

5B 

13 


IONOEC 

/I-O DEVI CE. INPUT TYPE. NO ECHO 

II 

se 

18 


• 


01 

50 

TE 

NXTCIN. 

CPI 


01 

SE 

IO 


CR 

/CARRI AG E RETURt EH TER ED? 

01 

57 

CA 


JZ 


01 

61 

CB 


CR 

/YES. THEN THAT'S THE END OF THE LINE 

01 

61 

II 


1 


11 

62 

FE 


CPI 

/VAS A CTRL/E EH TER ED? 

11 

63 

• 5 


• 05 


11 

64 

CA 


JZ 

/YES. THEN ERASE THE ENTIRE LINE 

II 

65 

91 


ALLBCX 

/PRINT A CR « LF. PRINT THE LINE 

01 

66 

II 


0 

/NUHBER AGAIN. AND GET SOME TEXT 

01 

67 

FE 


CPI 

/LINE FEED ENTERED? 

II 

68 

•A 


LF 
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II 

69 

CA 


JZ 

/YES» THEN PRINT THE LINE THAT 

11 

6A 

97 


SHOW 

/HAS BEEN ENTERED SO FAR. 

II 

6B 

II 


0 


SI 

6C 

FÉ 


CPI 


II 

6D 

13 


CTRL C 

/CTRL-CT THEN SEE VHATS UP. 

II 

6E 

CA 


JZ 


11 

6F 

EF 


NOGOOD 


II 

71 

03 


0 


II 

71 

F E 


CPI 


11 

78 

19 


TAB 

/CTRL-TAB OR CTRL-17 

11 

73 

CA 


JZ 

/YES. THEN TYPE SPACES TO THE TAB STOP 

II 

74 

85 


TAB 


II 

75 

08 


• 


01 

76 

F E 


CPI 


II 

77 

7 F 


177 

/VAS IT THE RUBOUT KEY» FOR ERROR CORRECT. 

01 

76 

CA 


JZ 

/YES. THEN ERASE A CHARACTER 

II 

79 

D5 


EAASE 


01 

7A 

01 


0 


II 

7B 

FE 


CPI 


01 

7C 

80 


040 

/IONORE ANY ASCII CHARACTER VITH A 

11 

7D 

DA 


JC 

/CODE LESS THAN 040 EXCEPT AS ABOUE- 

11 

7E 

SA 


NXTLET 


01 

7 r 

01 


• 


II 

61 

FE 


CPI 


• 1 

61 

60 


140 

/NOTHING GREATER THAN 140 E1THER 

01 

88 

D8 


JNC 


II 

83 

SA 


NXTLET 


01 

84 

01 


1 


11 

86 

77 


HOVMA 

/SAVE THE CHARACTER IN THE H1N1-BUFFER 

II 

86 

CD 


C ALL 


• 1 

87 

0F 


IOO 

/OH» NOV TYPE THE CHARACTER OUT 

01 

88 

16 


0 


01 

69 

83 

NOEC. 

INXH 

/1NCREMENT THE MINI-BUFFER POINTER 

II 

8A 

OD 


DCRC 

/DECREMENT THE TAB STOP CO IN TER 

01 

8B 

C2 


JNZ 

/GET ANOTHER CHARACTER IF ITS NOT 000 

11 

se 

SA 


NXTLET 


01 

8D 

01 


0 


01 

8E 

C3 


JHP 

/SET THE SPACE (TABI CO UN TER BACK TO 010 

01 

8F 

56 


NEVTAB 


01 

91 

01 


0 


II 

91 

CD 

ALLBCK» 

C ALL 

/ERASE THE ENTI RE LINE. SO PRINT 

01 

92 

39 


CRLF 

/A CR 4 LF» AND THEN REINIT1ALIZE 

11 

93 

08 


0 

/THE ADDRESS IN REGI STER PAIR H 

II 

94 

C3 


JHP 

/AND PRINT THE LINE NUHBER. 

01 

95 

4A 


□.INE 


II 

96 

01 


0 


01 

97 

EB 

SHOW» 

XCHG 

/PUT THE NINI-BUFFER ADDRESS IN D4E 

II 

98 

81 


LXIH 

/GET THE NINI-BUFFER STARTING ADDRESS 

11 

99 

A8 


BUFF2' 


II 

9A 

18 


0 


11 

9B 

CD 


C ALL 

/PRINT A CR 4 LF 

II 

9C 

39 


CRLF 
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II 

9D 

12 


1 


II 

9E 

CD 


CALL 

/THSN PRINT THE CURRWT LINE N UH BER 

II 

9 r 

73 


BFOUT 


81 

Al 

• 4 


1 


II 

Al 

7B 


HOVAE 

/SUBTRACT THE STARTING ADDRESS OF 

II 

AB 

95 


SUGL 

/MINI-BUFFER FROH THE "CURRENT 

81 

A3 

5F 


HOVEA 

/BUFFER* ADDRESS TO D ET EHM IN E THE 

81 

AA 

7A 


HOVAD 

/NUHBER OF CHARACTERS TO PRINT. 

II 

AS 

9C 


SBBH 


81 

A6 

57 


NOVDA 


II 

A7 

IE 


N VI C 

/SET THE SPACE CO UN TER «FOR TABS> 

II 

A8 

• 8 


III 


81 

A9 

C3 


JHP 

/THEN IS IF THE USER IS TRYING TO 

II 

AA 

C3 


SHOW 

/•LIST" A LINE THAT CONTAINS 

II 

AB 

11 


1 

/HO CHARACTERS 

81 

AC 

7E 

SHOVIT, 

MOVAM 

/GET A CHARACTER FROH THE BUFFER 

81 

AD 

FE 


CPI 

/IS IT THE CTRL/I CODE <TAB>» 

II 

AE 

• 9 


TAB 


II 

AF 

C2 


JNZ 

/NO. THEN SIHPLY PRINT 

81 

BO 

BB 


NOSHOW 

/THE CHARACTER. 

81 

B1 

01 


0 


01 

B2 

CD 


CALL 

/IT VAS A CTRL/1 (TABI SO PRINT 

11 

B3 

2D 


TABBR 

/THE NUHBER OF SPACES D ET EHM IN ED 

II 

B4 

12 


0 

/BY THE CONTENT OF THE C REGI STER 

81 

B5 

C3 


JHP 

/THEN GET ANOTHER CHARACTER 

II 

B6 

CI 


SHOVT 


II 

B7 

01 


0 


81 

B8 

CD 

NO SHOW, 

CALL 

/NOT A CTRL/1, SO PRINT IT. 

81 

B9 

0F 


IOO 


11 

BA 

18 


0 


• 1 

BB 

ID 


DCRC 

/DECREMINT THE SPACE COUNT 

81 

BC 

C2 


JNZ 

/NOT ZERO, SO SXIP OVER THE 

11 

BD 

CI 


SHOWT 

/HVIC INSTRUCTION 

SI 

BE 

01 


0 


11 

BF 

0E 


M VI C 

/C VAS DECREMENTED TO ZERO, SO 

01 

C8 

18 


818 

/REINITIAL1ZE IT. 

II 

CI 

23 

SHOWT, 

INXH 

/INCR1MINT THE BUFFER ADDRESS 

01 

C2 

IB 


DCXD 

/DECREMENT THE CHARACTER COINT 

01 

C3 

7A 

SHOW, 

HOVAD 

/HAS THE COUNT BEEN DECREMENTED 

01 

C4 

B3 


ORA E 

/TO ZER07 

01 

CS 

C2 


JNZ 

/NO, THEN GET ANOTHER CHARACTER 

11 

C6 

AC 


SHO VI T 

/FROH THE NINI-BUFFER. 

01 

C7 

01 


1 


• 1 

CB 

C3 


JHP 

/YES, THEN GET ANOTHER CHARACTER 

• 1 

C9 

SA 


NXTLET 

/OR COHHAND FOR THE ONE LINE OF 

01 

CA 

II 


1 

/TEXT. 
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01 

CB 

77 

CR* 

HO IMA 

/RETURN KEY PRESS ED# SAVE IT 

01 

cc 

23 


INXH 

/1NCREMEMT THE HINI-BUFFER ADDRESS 

oi 

CD 

36 


NVIM 

/SAVE A BUFFER TERMINATOR AFTER 

01 

CE 

00 


STEHH 

/THE CR (015# OD) VALUE* 

01 

cr 

CD 


CALL 

/INCREHEMT THE BUFFER LINE 

01 

DO 

5D 


B FI. INC 

/N UH BER 

01 

DI 

04 


0 


01 

D2 

C3 


JHP 

/PRINT A CR AND LF AND THEN 

01 

D3 

39 


CRLF 

/RETURN FROM THE "ONELN" 

01 

D4 

02 


0 

/ SUB ROUTINE 

01 

DS 

3E 

E RASE* 

MV1A 

/TYPE A BACXVARDS SLASH 

01 

D6 

DC 


334 

/ON THE IOO DEVI CE. 

01 

D7 

CD 


CALL 


01 

D6 

0F 


100 


01 

D9 

18 


0 


01 

DA 

2B 

EU 

DCXH 

/DECREMENT THE HINI-BUFFER POINTER 

01 

DB 

EB 


XCHG 


01 

DC 

21 


LXIH 

/THIS PREVENTS US FROM "BACHINO UP" 

01 

DD 

A8 


BUFF2 

/INTO ANOTHER LINE OF TEXT. 

0 1 

DE 

18 


0 


01 

DE 

7B 


HO VA E 


01 

E0 

95 


SUBÌ. 


01 

E1 

7A 


NOVAD 

/CALCULATE THE N UH BER OF CHARACTERS 

01 

E2 

9C 


SBBH 

/IN THE MINI TEXT BUFFER 

01 

E3 

EB 


XCHG 


01 

E4 

D2 


JNC 

/OH. VE HAVEN 'T bACKED UP ALL THE VAY 

01 

E5 

EB 


NOBEG 

/TO THE BEGINN1NG OF THE BUFFER# 

01 

E6 

01 


0 

/FINO OUT VHAT CHARACTER VAS JUST ERASED 

01 

E7 

23 


INXH 


01 

E8 

C3 


JHP 

/THIS IS TO PREVENT ECHOING 

01 

E9 

1A 


NOOUT 

/OF THE FIRST CHARACTER IN 

01 

EA 

02 


0 

/A LINE UPON MULTIPLE ERASURES 

01 

EB 

7 E 

NOBEG* 

HOVAM 

/GET A CHARACTER# VAS IT A "TAB" 7 

01 

EC 

FE 


CPI 


01 

ED 

09 


TAB 


01 

EE 

C2 


JNZ 

/NO. THEN ITS A CHARACTER 

01 

EF 

OD 


NOCT 


01 

ro 

02 


0 


01 

FI 

E5 


PUSHH 

/IT VAS A TAB# SAVE THE BUFFER ADDRESS 

01 

F2 

0E 

BACK U 

M VI C 

/SET THE "SPACE COUNTER" TO 010 

01 

F3 

08 


010 


01 

F4 

£B 

BACK2* 

DCXH 

/DECREMENT THE BUFFER ADDRESS 

01 

F5 

7E 


HOVAM 

/AND SEE IF VE HAVE DECREMENTED 

01 

F6 

FE 


CPI 

/TO THE VERY BEGINNING OF THE LINE 

01 

F7 

OD 


CR 


01 

F8 

CA 


JZ 

/THE ENTIRE LINE HAS BEEN ERASED 

01 

F9 

07 


TABX 

/(VE HAVE BACKED UP TO THE BEGINNING 

01 

FA 

02 


0 

/OF THE LINE)# SO GET A CHARACTER 

01 

FB 

FE 


CPI 

/FOUND ANOTHER CONSECUTIVE TAB7 

01 

FC 

09 


TAB 


01 

FD 

CA 


J2 

/YES# THEN GET ANOTHER CHARACTER 

01 

F E 

07 


TABX 


01 

FF 

02 


0 



143 




TYCHON EDITOR-ASSEMBLER V-3 


PAGE 14-(12 


02 

00 

OD 


DCRC 

/DECREMENT THE COURT 

02 

01 

C2 


JNZ 

/1F 1TS NOT ZENO. SET ANOTHER 

12 

02 

F4 


BACK 2 

/CHARACTER. 

• 2 

03 

01 


• 


02 

04 

C3 


JNP 

/IT 1S ZERO. REINIUAMZE C. AND 

02 

05 

F2 


BACK 1 

/THEN SET ANOTHER CHARACTER. 

02 

06 

01 


• 


02 

07 

E1 

TABX, 

POPH 

/SET THE TEXT BUFFER ADDRESS 1NTO HAL 

02 

08 

3E 


H VI A 

/AND TYPE OUT 

02 

09 

AO 


240 

/A SPACE EACH T1HE A TAB IS 

02 

0A 

C3 


JNP 

/POIWD. 

02 

OB 

17 


NOETI 

/AND SET A CHARACTER FROM *100* 

02 

OC 

02 


0 


02 

OD 

OC 

NOCT, 

1NRC 

/NOT A TAB, INCREMENT THE SPACE COUNTER 

02 

OE 

79 


MOV AC 

/SET THE CO IN TER 

02 

or 

FE 


CP1 

/HAS IT BEEN IN CREN IN TED PAST I TS 

02 

IO 

09 


0 1 1 

/UPPER LIMI T7 

02 

11 

C2 


JNZ 

/NO. THEN OET ANOTHER CHARACTER. 

02 

12 

16 


NO ET 


02 

13 

02 


0 


02 

14 

OE 


NV1C 

/YES. SO SET C TO ZERO 

02 

15 

00 


000 


02 

16 

7 E 

NO ET# 

HOVAM 

/GET THE *ERASED* CHARACTER 

02 

17 

CD 

NOETI, 

CALL 

/PRINT IT ON THE I/O OUTPUT DEVICE. 

02 

18 

or 


100 


02 

19 

18 


0 


02 

IA 

CD 

NOOUT, 

CALI. 

/SET A CHARACTER FROM THE KEYBOARD 

02 

IB 

03 


IONOEC 

/A NEV BUFFER CHARACTER OR 

02 

1C 

18 


1 

/ ERA SE COMM AND. 

02 

ID 

FE 


CPI 

/ANOTHER ERASE COMM AND 7 

02 

IE 

7 r 


177 


02 

ir 

CA 


JZ 

/YES. THEN PRINT THE 'ERASED* 

02 

20 

DA 


Et 

/CHARACTER. 

02 

21 

01 


0 


02 

22 

C3 


JNP 

/NOT AN ERASE COMMAND, SO ADD THE 

02 

23 

SD 


NXTC1N 

/CHARACTER TO THE BUFFER OR 

02 

24 

01 


0 

/INTERPRETE IT AS A COMMAND. 

02 

25 

T7 

TAB, 

MOVHA 

/SAVE THE TAB IN MEMORY 

02 

26 

23 


1NXH 

/INCREMEMT THE BUFFER ADDRESS 

02 

27 

CD 


CAU. 

/PRINT THE NUMBER OF SPACES, 

02 

28 

2D 


TABBR 

/AS D ET EHM IN ED BY THE CONTENT 

02 

29 

02 


0 

/Or THE C RESISTER 

02 

2A 

C3 


JNP 

/THEN OET ANOTHER CHARACTER POR 

02 

2B 

58 


NEVTAB 

/THE TEXT BUFFER OR ANOTHER 

02 

2C 

01 


O 

/COMMAND 

02 

2D 

3E 

TABBR, 

NVIA 

/LOAD THE A RESISTER VITH THE 

02 

2E 

AO 


240 

/ASCII VALI» FOR A * SPACE" 

02 

2F 

CD 


CAU. 

/PRINT THE SPACE ON THE I/O 

02 

30 

or 


100 

/OUTPUT DEVICE 

02 

31 

18 


• 


02 

32 

OD 


DCRC 

/DECREMENT THE SPACE COINT IN C 
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12 

33 

C2 


JNZ 

/IF THE RESULT IS NON-ZESO» 

02 

34 

2D 


TABBR 

/PRINT ANOTHER SPACE. 

02 

35 

02 


0 


12 

36 

OE 


M VI C 

/PRINTED THE SPACES. REINITILIZE THE 

02 

37 

08 


010 

/C REGI STER 

02 

36 

C9 


RET 

/AND THEN RETURN 

12 

39 

3E 

CRLF# 

N VI A 

/LOAD THE A REGI STER VITH THE ASCII 

12 

3A 

8D 


215 

/VALUE FOR A CARRIAGE RETUJW 

02 

3B 

CD 


CALL 

/PRINT THE CHARACTER ON THE I/O 

02 

3C 

or 


IOO 

/OUTPUT DEVI CE. 

12 

3D 

18 


0 


02 

3E 

3E 


H VI A 

/THEN LOAD THE A REGI STER VITH THE 

02 

3F 

SA 


212 

/ASCII VALUE FOR A LINE rEED 

02 

40 

C3 


JMP 

/AND PRINT IT ON THE I/O OUTPUT 

02 

41 

0F 


IOO 

/DEVI CE 

02 

42 

18 


0 





/•RDRIN 

* IS USED TO READ A LINE OF TEXT INTO MEMORY 




/ ADDRESSED BY REGI STER PAI R H. 17 A CO 1S READ. THE 




/MI CROCOMPUTER 

RETU1WS TO ’ONELN.* IF A CTRL/C IS 




/READ. 

CONTROL 

RETURNS TO THE COMHAND DECODER. 

02 

43 

CD 

RDRIN. 

CALL 

/GET A CHARACTER FRON THE READER 

02 

44 

OC 


IOR 


02 

43 

18 


0 


02 

46 

TE 


CPI 

/VAS A CTRL/1 (TAB) JUST READ? 

02 

47 

09 


TAB 


02 

48 

CA 


JZ 

/YES. THEN SAVE IT IN MEMORY 

02 

49 

s r 


SAVRC 

/AND READ ANOTHER CHARACTER. 

02 

4A 

02 


0 


02 

4B 

rr 


CPI 

/VAS A CARRI AG E RETUfM JUST READ7 

02 

4C 

OD 


CR 


02 

4D 

CA 


JZ 

/YES. THEN SAVI IT IN MEMORY AND 

02 

4E 

sr 


SAVRC 

/READ ANOTHER CHARACTER. 

02 

4 F 

02 


0 


02 

SO 

r e 


CPI 

/VAS A CTRL/C JUST READT 

02 

SI 

13 


CTRLC 


02 

52 

CA 


JZ 

/YES. THEN VE ARE DOME READIHG 

02 

53 

69 


DONRDR 

/FRON THE READER. 

02 

54 

02 


0 


02 

SS 

r e 


CPI 

/VAS THE CHARACTER READ LESS THAN 0407 

02 

56 

20 


040 


02 

57 

DA 


JC 

/YES. THEN IGNORI THE CHARACTER 

02 

56 

43 


RDRIN 


02 

59 

02 


• 


02 

SA 

FÉ 


CPI 

/VAS THE CHARACTER GREATER THAN 1377 

02 

SB 

60 


140 


02 

se 

02 


JNC 

/YES. THEN UMORE THE CHARACTER 

02 

SD 

43 


RDRIN . 


02 

SE 

02 


0 


02 

SP 

77 

SAVRC. 

HO IMA 

/THE CHARACTER IS *OK*. SO SAVE IT 

02 

61 

23 


INXM 

/INCRIMZNT THE MEMORY ADDRESS. 

02 

61 

ri 


CPI 

/VAS THE CHARACTER A CARRI AGE RETU1HT 
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oe 

62 

8D 


CR 


oe 

63 

C2 


JNZ 

/NO* THEN READ ANOTHER CHARACTER. 

02 

64 

43 


RDRIN 


02 

65 

82 


8 


12 

66 

36 


HVIM 

/YES* THEN SAVE A ZERO AFTER THE 

>2 

67 

88 


880 

/ASCII VALUE FOR A CARRIAGE RETUIM 

82 

68 

C9 


RET 

/RETURN FROM "ONELN" 

82 

69 

A F 

DONRDR* 

XRAA 

/FOUND THE CTRL/C AT THE END OF 

82 

6A 

32 


STA 

/THE TAPE* SO DISABLE THE READER 

82 

6B 

48 


RORK 

/(ENABLE THE KEYBOARD) AND RETURN 

82 

6C 

18 


0 


• 2 

6D 

C3 


JMP 

/TO THE CONM AND DECODER 

82 

6E 

EF 


NOGOOD 


82 

6F 

83 


0 






/THIS ROUTINE PUNCHES A PAPER TAPE 





/VITH A 

CTRL-C AT THE END. 

82 

70 

3E 

TAPE* 

H VI A 

/SET THE "PORL* SV1TCH TO P FOR 

82 

71 

58 


•P* 

/PIMCHING A PAPER TAPE 

82 

72 

C3 


JHP 

/THEN SAVE THE CONTENT OF THE 

82 

73 

7A 


SETPL 

/A REGI STER IN "PORL" 

82 

74 

82 


0 


82 

75 

CD 

LIST* 

CALL 

/SET THE BUFFER LINE NUMBER 

82 

76 

68 


BF1 

/TO 0001 

02 

77 

84 


0 


82 

78 

3E 


NVIA 

/SET THE PORL SENSE REGI STER TO 

02 

79 

4C 


"L" 

/L FOR A LIST OF THE TEXT 

82 

7A 

32 

srrPL» 

STA 

/SAVE THE ASCII P OR L IN MEMORY 

82 

7B 

41 


PORL 


82 

7C 

18 


8 


82 

70 

CO 

LORP* 

CALL 

/FIND OUT IF VE ARE TO LIST OR PUNCH 

82 

71 

ce 


INPUT 

/ONE LINE* A GROUP OF LINES OR THE 

82 

7 F 

03 


8 

/CONTENT OF THE IN TI RE TEXT BUFFER. 

82 

88 

FE 


CPI 

/PUNCH OR LIST ONE LINE) 

82 

81 

80 


880 


82 

82 

CA 


JZ 

/YES 

82 

83 

A5 


ONELST 

/IT A > 80 0* DO 1 LINE 

82 

84 

82 


8 


82 

85 

FE 


CPI 

/PIMCK OR LIST THE ENTI RE TEXT BUFFER7 

se 

86 

82 


882 


82 

87 

CA 


JZ 

/YES 

12 

88 

AE 


ALL1ST 

/ir A-802* DO COMPLETE BUFFER 

82 

89 

82 


0 


82 

SA 

CD 


CALL 

/NO* VE'RE GOINQ TO PINCH OR LIST 

82 

8B 

90 


DI FF 

/A GROUP OF LINES* SO CALCULATE 

82 

8C 

82 


0 

/THE NIMBER OF LINES. 

82 

80 

C3 


JHP 

/THEN PINCH OR LIST THE GROUP 

82 

SE 

A8 


BLXLST 

/OF LINES IN THE TEXT BUFFER 

02 

s r 

82 


8 


82 

98 

2A 

DI FF» 

LKLD 

/CALCULATE THE DIFFERENCE BEThEEN 

82 

91 

17 


INITLN 

/"INITLN" AND "FINLM" 
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oe 

92 

18 


0 


0£ 

93 

EB 


XCHG 


02 

94 

2A 


LKLD 

/THESE CONTAIN THE BINARY EQUI VALENTS 

«2 

95 

19 


FINLN 

/OF THE MUHBERS THE USER TYPED IN 

02 

96 

18 


0 


12 

97 

TD 

TAK EDF. 

HO VAL 

/SUBTRACT THE 16-BIT *INITLN* FROM 

02 

98 

93 


SUB E 

/THE 16-BIT “FINLN “ 

02 

99 

6F 


HOVLA 


• 2 

9A 

7C 


NO VAH 


>2 

9B 

9A 


SBBD 


02 

9C 

67 


MOVHA 


12 

9D 

23 


INXH 

/INCRETIENT THE DIFFERENCE BY 1 

02 

9E 

22 


SHLD 

/ir VE TYPED L3-S. VE VANT TO LIST 

02 

9F 

1B 


ADI FF 

/LINES 3.4 AND S OR LIST 3 LINES 1 

02 

A0 

18 


0 


02 

Al 

DO 


RNC 

/RETU1W IF “INI TLN “ IS LESS THAN 

02 

A2 

C3 


JMP 

/“FINLN*. OTHERVI SE* PRINT A 

02 

A3 

EF 


MOGOOD 

/7 AND RETUTW TO THE COMMAND DECODER. 

02 

A4 

03 


0 


02 

A5 

CD 

ONELST. 

CALL 

/LIST OR PINCH ONE LINE. SO 

02 

A6 

63 


DIFF1 

/SET ADIFF TO 000 001 

02 

A7 

03 


0 


02 

A8 

CD 

BLKLST. 

CALL 

/NOV F1ND THE BEGINNING OF THE LINE 

02 

A9 

32 


SEEX 

/IN THE TEXT BUFFER USING “INITLN* AS 

02 

AA 

04 


0 

/CARRAGE RETURN OR LINE CO IH TER 

02 

AB 

C3 


JMP 


02 

AC 

B8 


LDROK 

/SHOULD VE PUICH LEADER 7 

02 

AD 

02 


0 


02 

AE 

2E 

ALLIST. 

MVIL 

/VE VANT TO LIST OR PIHCH THE CONTENT 

02 

AF 

FF 


377 

/OF THE IN TI RE TEXT BUFFER. 

02 

B0 

26 


M VI H 


02 

B1 

FF 


377 


02 

B2 

22 


SHLD 

/SO SET “ADI FF* OR DIFFERENCE TO 

02 

B3 

1B 


ADI FF 

/377 377 

02 

B4 

18 


0 


02 

B5 

2A 


LKLD 

/LOAD REGI STER PAIR H VITH THE 

02 

B6 

22 


TXTBIJF 

/STARTING ADDRESS OF THE TEXT BUFFER 

02 

B7 

18 


0 


02 

B8 

3A 

LDROK. 

LDA 

/IS THIS A PINCH OR LIST 0PERAT10N7 

02 

B9 

41 


PORL 


02 

BA 

18 


0 


02 

BB 

FE 


CPI 


02 

BC 

50 


•P* 


02 

BD 

C2 


JNE 

/ITS A LIST OPERATION 

02 

BE 

C6 


FRSTLH 


02 

BF 

02 


0 


02 

CO 

CD 


CALL 

/ ITS A PUICH OPERATION. SO 

02 

CI 

SS 


LDR 

/PUNCH SOME LEADER 

02 

C2 

OS 


0 


02 

C3 

C3 


JMP 

/AND THEN START PW CHINO THE TAPE 

OC 

C4 

3D 


TAPEI 


02 

C5 

OS 


0 
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12 

C6 

3A 

FRSTLN» 

LDA 


(2 

C7 

Al 


PORL 

/DO VE PUNCH THE BUFFER OR LIST IT 7 

12 

C8 

18 


0 


*2 

C9 

FÉ 


CPI 


• 2 

CA 

SO 


■p* 


(2 

CB 

CA 


JZ 

/P POR PINCH. SO PUOCH IT. 

• 2 

CC 

3D 


TAPEI 


«2 

CD 

OS 


0 


02 

CE 

CD 


CALL 

/VE LIST IT# SO PR1NT A LINE NUMBER 

12 

c r 

73 


BFOirr 

/FOR THE LINEISI OF TEXT. 

02 

DO 

OA 


0 


02 

DI 

CD 


CALL 

/THEN INCRETI BIT THE LINE NUMBER BY 1 

02 

D2 

SD 


BFL1NC 


02 

D3 

OA 


0 


02 

DA 

OE 

SCHAR# 

H VI C 

/LOAD THE C RESISTER VITH 010 (THE 

02 

DS 

08 


010 

/SPACE CO UNTI IN CASE A "TAB" IS ROUND. 

02 

D6 

7 E 

LCHAR# 

HOVAM 

/GET A CHARACTER FROM THE TEXT BUFFER 

02 

D7 

FE 


CPI 


02 

D3 

9B 


BTERH 

/BUFFER TE1WINATOR YET? 

02 

D9 

CA 


JZ 

/YES# THEN GET ANOTHER COMM AND. 

02 

DA 

70 


QUESTI 


02 

DB 

00 


8 


02 

DC 

FE 


CPI 


02 

DD 

OD 


CR 

/CARRIAGE RETUm 7 

02 

DE 

CA 


JZ 

/YES# THEN DECREMENT THE LINE COUNT. 

02 

DE 

r> 


QITCRS 


02 

EO 

02 


0 


02 

E1 

FE 


CPI 

/VAS A CTRL/1 (TAB) READ7 

02 

E2 

09 


TAB 


02 

E3 

CA 


JZ 

/YES# THEN PRINT THE REQUI RED 

02 

EA 

F3 


TABI 

/NUMBER OF SPACES. 

02 

E3 

02 


0 


02 

E6 

CD 


CALL 

/NONE OF THE ABOVE# SO PRINT IT. 

02 

ET 

OF 


100 


02 

ES 

18 


0 


02 

E9 

OD 


DCRC 

/DECRETI BIT THE "SPACE" COITI TER 

02 

EA 

C2 


JNZ 

/IF 1TS NOT ZERO# DO NOT 

02 

EB 

EF 


RET2 

/ REIN I TI AL IZ E IT. 

02 

EC 

02 


0 


02 

ED 

OE 


H VI C 

/IT IS ZERO# SO RE1N1T1ALIZE IT 

02 

EE 

08 


010 


02 

E r 

23 

RET2# 

INXH 

/1NCREMENT THE MEMORY ADDRESS 

02 

ro 

C3 


JHP 

/AND GET ANOTHER CHARACTER 

02 

ri 

D6 


LCHAR 


02 

F2 

02 


0 


02 

F3 

CD 

TABU 

CALL 

/A TAB VAS FOUND IN MEMORY DURINO THE 

02 

FA 

2D 


TABBR 

/LISTINO OPERATION# SO PRINT THE 

02 

F5 

02 


1 

/REQUIRED NUMBER OF SPACES 

02 

F 6 

C3 


JHP 

/AND GET ANOTHER CHARACTER 

02 

F7 

EF 


RET2 


02 

F8 

02 


0 


02 

n 

CD 

CNTCRS. 

CALL 

/FOUND A CR# SO PRINT A CR t LF 
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>6 


17 


12 

FA 

39 


CHEF 


•2 

FB 

02 


8 


12 

re 

23 

ENDPL# 

INXH 

/INCREMENT THE BUFFER ADDRESS 

• 2 

FD 

E5 


PUSHH 

/SAVE THE BUFFER ADDRESS OH THE STACX 

12 

FE 

2A 


LHLD 

/LOAD H4L VITH THE NUMBER OF LINES 

12 

FF 

1B 


ADI FF 

/TO BE LISTED OR P1MCHED. 

13 

00 

18 


0 


03 

01 

2B 


DCXH 

/DECRETIENT THIS NUHBER 

03 

02 

22 


SKLD 

/AND SAVE IT BACK IN R/V MEMORY 

03 

03 

1B 


ADI FF 


03 

0A 

18 


0 


13 

05 

7C 


MOVAH 

/!S THE RESU.T OF THE DCXH ZERO? 

03 

06 

B5 


ORAL 


03 

07 

Et 


POPH 

/POP THE BUFFER ADDRESS OFF OF THE STACX 

03 

08 

C2 


JNE 

/THE RESULT IS NON-ZERO» SO THERE ARE 

13 

09 

C6 


FRSTLN 

/ADDITIONAL LINES TO LIST OR PIMCH 

03 

OA 

02 


0 


03 

OB 

21 


LX1H 

/DON E LISTINO OR PIMCHINQ. LO AD H4L 

03 

OC 

41 


PORL 

/VITH THE ADDRESS OF “PORL* 

03 

OD 

18 


0 


03 

OE 

3E 


M VI A 

/LOAD A VITH THE ASCII VALUE FOR THE 

03 

OF 

4C 


"L“ 

/L OR LIST OPERATION 

03 

10 

BE 


CMPH 

/COMPARE IT TO THE COMMAND 

03 

11 

77 


MOVMA 

/THIM SET ‘PORL’ BACK TO THE L MODE 

03 

12 

CA 


JZ 

/VE VERE LISTINO* SO JUHP BACH TO 

03 

13 

70 


QUESTI 

/TO THE COMMAND DECODER 

03 

14 

00 


O 


03 

15 

3E 

TRLRr 

MVIA 

/VE VERE P1MCH1NG* SO PUNCH 

03 

16 

83 


203 

/A CTRL/C AT THE END OF THE TAPE 

03 

17 

CD 


CALL 


03 

18 

09 


IOP 


03 

19 

18 


0 


03 

1A 

CD 


CALL 

/FOLLOVED BY TRAILER. 

03 

1B 

55 


LDR 


03 

IC 

05 


0 


03 

1D 

C3 


JNP 

/THIM QET ANOTHER COMMAND. 

03 

1E 

70 


QUESTI 


03 

1F 

00 


0 
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/THIS PORTI OH or THE PROGRAM IS EXECUTED ir VE WAMT TO 
/DEL ET E ONE LINE, A GROUP Or LINES OR THE CON T BIT or THE 
/ENTIRE TEXT BUrEER. 


13 

21 

CD 

DEL ET. 

CALL 

/GET THE LINE NUMBER(S) TO BE DELETED, 

(3 

21 

C2 


INPUT 


03 

22 

13 


0 


13 

23 

rs 


CPI 

/DELETING ONE LINE? 

13 

24 

(0 


000 


03 

25 

CA 


JZ 


03 

26 

3E 


DEGNE 

/YES. THEN JUMP TO DEGNE 

03 

27 

03 


0 


(3 

28 

rE 


CPI 

/DELETING THE ENTIRE TEXT BUFFER7 

03 

29 

(2 


002 


03 

2A 

C2 


JNZ 

/NO. THEN VE ARE DELETING A 

03 

2B 

44 


BLK D 

/GROUP CBLOCX) Or LINES. 

03 

2C 

03 


0 


03 

2D 

21 


LXIH 

/TRYING TO DELETE EVERYTHING. SO 

03 

2E 

17 


ATS 

/TYPE OUT "ARE YOU SURE 7* 

03 

2E 

12 


0 

/ (LOAD H4L VITH THE MESSAGE ADDRESS) 

03 

30 

CD 


CALL 

/PRINT THE MESSAGE 

03 

31 

7A 


TOUT 


03 

32 

(5 


0 


03 

33 

CD 


CALL 

/GET THE USER'S RESPONSE 

03 

34 

06 


IOECHO 


03 

35 

18 


0 


03 

36 

r e 


CPI 

/IS THE AN SVER Y POR YEST 

03 

37 

59 


*Y* 

/(Y-YES-DELETE THE ENTIRE BUFFER) 

03 

38 

C2 


JNZ 

/NOT A *Y*. LEA VE THE TEXT BUrrER ALONE 

03 

39 

6B 


QUEST 

/AND GET ANOTHER USER COMM AND 

03 

3A 

00 


0 


03 

3B 

C3 


JMP 

/A *Y* VAS ENTERED. SO DELETE THE 

03 

3C 

65 


DEL ALL 

/BITIRE TEXT BUFFER. 

03 

3D 

00 


0 


03 

3E 

CD 

DEGNE, 

CALL 

/DELETING ONE LINE. SET 'ADirr* 

03 

sr 

63 


Dirri 

/TO 000 OSI. 

03 

40 

03 


0 


03 

41 

C3 


JMP 

/THEN DELETE THE LINE PROM THE 

03 

42 

47 


BLXDI 

/TEXT BUFFER. 

03 

43 

03 


0 


03 

44 

CD 

BLK D» 

CALL 

/DELETING A BLOCK (GROUP) OF LINES. SO 

03 

45 

90 


di rF 

/SUBTRACT -INITLN* FROM ’FINLN* AND 

03 

46 

02 


0 

/ADD ONE TO THE RESULT. 

03 

47 

CD 

BLXDI, 

CALL 

/DELETE THE GROUP OF LINES 

03 

48 

4D 


DELIT 


03 

49 

03 


0 


03 

4A 

C3 


JMP 

/THEN GO BACK TO THE COMM/MD DECODER. 

03 

4B 

70 


QUESTI 


03 

4C 

00 


0 


(3 

4D 

CD 

DELI T. 

CALL 

/H4L VILL POINT TO THE FIRST CHAR- 

03 

4E 

32 


SEEX 

/ACTER THE NUMBER OF CR'S SPECI FI ED 
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03 

4F 

04 


0 

/BY "INITLN" VHEN CONTROL RETUMS 

03 

50 

CD 


CALL 


03 

51 

4F 


SEEX 1 

/USE D4E STARTING AT HAL 

03 

52 

04 


0 

/UNTIL THE DIFFERENCE IS POUND. 

03 

53 

1A 

POPHOR. 

LDAXD 

/THEN MOVE THE TEXT DOWN. 

03 

54 

77 


HO VAIA 

/MOVE ONE CHARACTER DOMI 

03 

55 

FE 


CPI 


03 

56 

9B 


BTERM 

/BUFFER TERMINAT0R7 

03 

57 

CA 


JZ 

/YES. VE ARE DOME 

03 

58 

5F 


ENDPOP 


03 

59 

03 


0 


03 

5A 

13 


INXD 

/NO. INCREMENT THE TVO ADDRESSES 

03 

5B 

23 


1NXH 


03 

5C 

C3 


JMP 

/AND MOVE ANOTHER CHARACTER. 

03 

5D 

53 


POPNOR 


03 

5E 

03 


0 


03 

5F 

22 

ENDPOP. 

SHLD 

/MOVED ALL OF THE CHARACTERS. SAVE 

03 

60 

14 


HIADD 

/THE HIGHEST ADDRESS USED. 

03 

61 

18 


0 


03 

62 

C9 


RET 

/THEN RETUJ6I FROM "DEL 1T* 

03 

63 

2E 

D1FF1. 

MVIL 

/SET THE L REGI STER TO ODI 

03 

64 

01 


001 


03 

65 

26 


MVIH 

/SET THE H REGI STER TO 000 

03 

66 

00 


000 


03 

67 

22 


SHLD 

/SAVE 000 001 IN "ADIFF" 

03 

68 

1B 


ADI FF 


03 

69 

18 


0 


03 

6A 

C9 


RET 

/AND THEN RETUM 


/TO INSERT. UE GET A LIME NUMBER TO INSERT IN FRONT OF 
/THEN VE FIND THE HAL ADDRESS FOR THAT LINE NUMBER» 

/VE THEN INPUT I LINE OF CODE INTO THE MINI-BUFFER 
/AND THEN COUNT HOV MANY CHARACTERS ARE IN THE LINE» 
/THE HAIN TEXT BUFFER IS THEN "OPENED UP". MAXING 
/ROOH POR THE ONE LINE OF TEXT. FINALLY» THE 
/ONE LINE OF TEXT IS MOVED FROM THE MINI-BUFFER TO 
/THE MAIN BUFFER WD THEN VE SEE IF ANOTHER LINE 
/VILL BE TYPED IN BY THE USER. 

13 6B CD INSERT. CALL /GET THE LINE NUMBER TO INSERT 

03 6C C2 INPUT /NEV TEXT IN FRONT OF. 

03 6D 03 0 

03 6E CD CALL /VAS 1 <CR> OR I 3-5 ENTEREDT 

03 6F 26 CHHIT /IF SO. ERROR. BECAUSE ONLY ONE 

03 70 06 0 /LINE NUMBER CAN BE SPECIFIED (I 4>. 

03 71 CD CHNG1. CALL /SET THE LINE BUFFER NUMBER 

03 72 68 BFI /TO 0001 

03 73 04 0 

03 74 CD CALL /THEN FIND THE POINT OF IN SERTION 

03 75 32 SEEX /IN THE MAIN TEXT BUFFER. THE 

03 76 04 0 /LINE # IS INCRED VITH EACH CR. 

03 77 22 NXTIN. SHLD /SAVE THE IN SERTION POINT ADDRESS 


151 




TYCHON EDITOR-ASSEMBLER V-3 


PAGE 05-003 


03 

78 

17 


INITLN 

/If ADDITIONAL LINES MUST BE 

03 

79 

18 


0 

/INSERTEO» 

03 

7A 

CD 


CALL 


03 

7B 

3C 


ONELN 

/INPUT 1 LINE INTO THE MINI-BUFFER 

03 

TC 

01 


0 


03 

7D 

21 


LX1K 

/LOAD H4L VITH THE ADDRESS VHERE 

03 

7E 

A8 


BUFF2 

/THE ONE LINE OF TEXT IS STORED. 

03 

tf 

18 


0 


03 

80 

CD 


CALL 

/NOV STORE THE LINE OF TEXT 

03 

81 

86 


STOBUF 

/IN THE HAIN TEXT BUFFER 

03 

82 

03 


0 


03 

83 

C3 


JMP 

/THEN SET ANOTHER LINE OF TEXT 

03 

84 

77 


NXTIN 

/TO BE INSERTEO 

03 

85 

03 


0 


03 

86 

ES 

STOBUF# 

PUSHH 

/SAVE THE BUFFER ADDRESS 

03 

87 

IE 


M VI E 

/LOAD D«E VITH 000 000 SO THAT THE 

03 

88 

00 


000 

/NUNBER OF CHARACTERS TO BE INSERTEO 

03 

89 

16 


HV1D 

/CAN BE COINTED. 

03 

SA 

00 


000 


03 

8B 

7E 

CNTCHR» 

MOVAM 

/GET A CHAR. FRON THE LINE OF TEXT 

03 

8C 

FÉ 


CP1 

/FOIND THE END OF THE LINE OF 

03 

8D 

00 


STERM 

/TEXT YET7 

03 

8E 

CA 


JZ 

/YES» THEN DA E CONTAIN THE 

03 

8 r 

96 


EH DCN T 

/NUNBER OF CHARACTERS IN THE LINE 

03 

90 

03 


1 


03 

91 

23 


IMXH 

/NOT THE LINE TERMINATOR< IN CRENENT 

03 

92 

13 


INXD 

/THE ADDRESS AND THE COUNT. 

03 

93 

C3 


JMP 

/THEN GET THE NEXT CHARACTER AND 

03 

94 

8B 


CNTCHR 

/COMPARE IT TO “STERI" 

03 

95 

03 


0 


03 

96 

2A 

DJDCHT, 

LHLD 

/GET THE ADDRESS FOR THE POINT 

03 

97 

17 


INI TLN 

/OF INSERTION. 

03 

98 

18 


1 


03 

99 

E5 


PUSHH 


03 

9A 

CI 


POPB 

/NOVE THIS ADDRESS TO BAC 

03 

9B 

2A 


LHLD 


03 

9C 

14 


H1ADD 

/GET ADDRESS OF THE 233 AT THE END 

03 

9D 

18 


0 

/OF THE MA1N TEXT BUFFER 

03 

9E 

ES 


PUSHH 

/SAVE THIS ADDRESS 

03 

9 r 

7D 


HOVAL 

/SU8TRACT THE “POINT OF INSERTION* 

03 

A0 

91 


SUBC 

/ADDRESS FROM THE HIGHEST ADDRESS 

03 

Al 

4F 


NO VCA 

/USED. 

03 

A2 

TC 


NOVAH 


03 

A3 

98 


SBBB 


03 

A4 

«7 


HOVBA 


03 

AS 

03 


INXB 

/ IN CREN EN T THE NUNBER OF BYTES BY 1 

03 

A6 

19 


DADO 

/HIADD ♦ CHARACTER COUNT IN HAL 

03 

A7 

22 


SHLD 

/SAVE THE NEV HIGH ADDRESS OF THE TEXT 

03 

A8 

14 


HIADD 

/BUFFER ONCE THE INSERTION HAS BEEN 

03 

A9 

18 


8 

/PERFORI ED 

03 

AA 

DI 


POPD 

/GET THE PREVIOUS "HIADD“ 

03 

AB 

1A 

OPEM1T» 

LDAXD 

/GET FRON THE PREVIOUS “HIADD* 

03 

AC 

77 


NO IMA 

/NOVE TO THE NEV “HIADD* 
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03 

AD 

28 


DCXH 

/ DECREN EM T BOTO MEMORY 

03 

AC 

1B 


DCXD 

/ADDRESSES 

03 

AF 

0B 


DCXB 

/AND THE NORD COURT. 

03 

Bl 

78 


MOVAB 


03 

Bl 

Bl 


ORAC 


03 

B2 

C2 


JNZ 

/HE HAVE NOT RADE ENOUGH BOOM IN 

03 

B3 

AB 


OPEN IT 

/TOE TEXT BUFFER FOR THE LINE OF 

03 

B4 

03 


0 

/TEXT* SO OPEN IT UP SOME MORE. 

03 

B5 

13 

INSIT. 

INXD 

/INCREMENT TO TOE POINT OF INSERTION 

03 

B6 

El 


POPH 

/GET TOE BUFFER ADDRESS 

03 

B7 

EB 


XCHG 


03 

B8 

IA 

INSITI* 

LDAXD 

/QET A BUFFER CHARACTER 

03 

B9 

FE 


CPI 

/INSERTED TOE ENTI RE LINE? 

03 

BA 

00 


STERM 


03 

BB 

C6 


RE 

./YES, TOEN DON E 

03 

BC 

77 


NO IMA 

/NO* TOEN SAVE TOE CHAR. IN TOE NA1N 

03 

BD 

23 


INXH 

/TEXT BUFFER AND INCREMENT THE 

03 

BE 

13 


INXD 

/TVO MEMORY ADDRESSES 

03 

BF 

C3 


JNP 

/THEN GET ANOTHER CHARACTER 

03 

CO 

B8 


INSITI 


03 

CI 

03 


0 
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/THIS SUBROUTIME IS USED TO INPUT THE LIME 
/NUMBER(S) THAT THE USER WANTS TO OPERATE OM. 


03 

C2 

CD 

INPUT» 

C ALL 

/SET ALL OF THE REG1STERS TO ZERO 

03 

C3 

29 


CUI ALL 


03 

C4 

04 


• 


03 

CS 

26 


MVIH 

/LOAD H VITH 377 (USED TO DETERMINE 

03 

C6 

FF 


377 

/I F A NUMBER HAS BEBi DI TER ED) 

03 

C7 

CD 

IMPUTI» 

CALL 

/GET A CH ARAC TER FROH THE KEY BOARD 

03 

C8 

06 


IOECHO 


03 

C9 

IS 


0 


03 

CA 

F E 


CPI 

/MAS THE CARRIAGE RETURN KEY PRESSED7 

03 

CB 

OD 


CR 


03 

CC 

CA 


JZ 

/YES» IT IS THE LINE TERMINATOR» 

03 

CD 

01 


TERM 

/SO SEE IF NO LINE NUMBERS» ONE 

03 

CE 

04 


0 

/LIME NUMBER OR TVO NUNBERS VERE DI TER ED. 

03 

cr 

FE 


CPI 

/MAS THE DASH (-> KEY PRESSED» TO 

03 

DO 

2D 


055 

/SEPARATE TVO LINE NUMBERS7 

03 

DI 

CA 


JC 

/YES» TUBI SAVE THE NUMBER IN 

03 

DB 

F3 


SECT 

/H*L IN "INITLN* 

03 

D3 

03 


0 


03 

D4 

FE 


CPI 

/VA5 A VALUE GREATER THAN ASCII 9 

03 

DS 

3A 


072 

/ Di TER ED (OCTAL 071) 

03 

D6 

D2 


JMC 

/YES» PRINT A 7 AND RETURN TO THE 

03 

D7 

EF 


MOGOOD 

/ COMM AH D DECODER 

03 

oe 

03 


• 


03 

D9 

FE 


CPI 

/VAS A VALUE LESS THAM ASCI I 0 

03 

DA 

30 


060 

/ DI TER ED (OCTAL 060) 

03 

DB 

DA 


JC 

/YES» IONORE IT. 

03 

DC 

EF 


NOGOOD 


03 

DD 

03 


0 


03 

DE 

D6 


SUI 

/IT IS A VALI D NUMBER» SO SUBTRACT 

03 

DF 

30 


060 

/060 FROH IT. 

03 

E0 

4F 


HOVCA 

/SAVE THE NIMBER IN C- 

03 

Ei 

06 


HVIB 

/SET B AND H TO ZERO 

03 

E2 

00 


000 


03 

E3 

26 


MVIH 


03 

E4 

00 


000 


03 

E5 

E5 

INOK» 

PUSHH 

/PUT THE TEMPORARY RESULT ON THE STACM 

03 

E6 

DI 


POPD 

/AND GET IT BACK IN D4E 

03 

E7 

29 


DADH 

/MULTI PLY BY 2 

03 

£8 

29 


DADH 

/MULTIPLY BY 2 AGAIN (TOTAL - X4> 

03 

E9 

19 


DADO 

/ADD» OR MULTI PLY BY 1 (TOTAL - XS) 

03 

EA 

29 


DADH 

/MULTIPLY BY 2 AGAIN (TOTAL • X10> 

03 

EB 

09 


DADB 

/MOV ADD IN THE NUMBER JUST TYPED IN. 

03 

EC 

C3 


JHP 

/TMM GET AMOTHER CHARACTER 

03 

ED 

C7 


IMPUTI 

/FROH THE KEYBOARD 

03 

EE 

03 


0 


03 

EF 

EI 

NOGOOD» 

POPH 

/DESTROY THE RETU1M ADDRESS 

03 

F 0 

C3 


JHP 

/TMEN PRINT 7» c- BECAUSE THE 

03 

FI 

6B 


QUEST 

/NUMBER OR COMM AMD IS INVALI D 

03 

F2 

00 


• 
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/•SUT 

IS EXECUTED IF A DA5H <-) IS ENTEREO 

<3 

F3 

7C 

sur* 

MOVAH 

/VAS THE FIRST OF 2 A'S 

13 

F4 

B5 


ORAI. 

/A 0 7 IF SO, ERROR. 

13 

FS 

CA 


JZ 


13 

F6 

E F 


NOOOOD 


13 

F7 

13 


0 


13 

re 

22 

NMBOK. 

SHLD 

/SAVE THE IN I TI AL LINE NUMBER 

13 

F9 

17 


IN1TLN 


13 

FA 

18 


1 


• 3 

FB 

CD 


C ALL 

/SET ALL OF THE REGISTERS TO ZERO 

13 

re 

29 


CLNALL 


13 

FD 

14 


1 


13 

FE 

C3 


JMP 

/AND GET THE SECOND OF TUO NIX BER S 

13 

FF 

C7 


IMPUTI 


14 

11 

03 


0 





/■TEW’ 

15 EXECUTED VHEN A CARRIAGE RETUM (CR> 




/I S IN TER ED» 


14 

11 

CD 

TERM, 

C ALL 

/A CARRI AGE RETU1M MAS INTERED. SO 

14 

12 

39 


CRLF 

/PRINT A CARRI AGE RET UHI <CR> AND A 

14 

03 

02 


8 

/LINE FEED ON THE TTY OR CRT. 

14 

14 

7C 


MOVAH 


14 

05 

FE 


CPI 

/ANY A'S TYPED IN AT ALL7 

04 

16 

FF 


377 


•4 

•7 

CA 


Jl 

ZAPPAR IN TLY HOT. THE USER VANTS TO 

04 

18 

21 


EVERY 

/OPERATE ON THE ENTIRE TEXT BUFFER 

14 

09 

04 


1 


*4 

IA 

B5 


ORAL 

/VAS A 1-011 TYPED IN 7 

04 

0B 

CA 


JZ 

/YES IT VAS. NO SUCH 

14 

te 

EF 


NOOOOD 

/Al 

14 

1D 

13 


1 


14 

OE 

3A 

BLKOR1. 

LDA 

/LOAD THE A REGI STER VITH THE HSBY 

04 

• F 

18 


SEN SE 

/OF THE 16-BIT "INITLN" (SEE THE 

14 

11 

18 


8 

/FIRST PAGE OF THE LISTINO 

14 

1 1 

FE 


CPI 

/IS IT STILL EQUAL TO THE PREVIOUSLY 

14 

12 

CI 


311 

/1NITIALIZED VALUE (SEE "QETCHR" 

04 

13 

CA 


JZ 

/AFTER "GUEST 1*). IF SO. 

14 

14 

IC 


ONEIM 

/ONLY ONE LINE A MAS IN TER ED. AND IT 

14 

15 

14 


0 

/IS IN REGI STER PA1R H 

14 

16 

22 


SHLD 

/TVO NIMBERS VERE ENTERED. SO SAVE 

14 

17 

19 


F1NLM 

/THE SECOND 16-BIT BINARY NIMBER 

14 

18 

18 


0 

/IN "FINLN* 

14 

19 

3E 


MVIA 

/THEN SET THE A REGI STER TO ONE TO 

14 

IA 

11 


Oli 

/INDICATE THAT 2 AS VERE ENTERED. 

04 

IB 

C9 


RET 


14 

1C 

22 

ONE1M. 

SHLD 

/ONE A VAS ENTERED BEFORE THE CR. 

14 

1D 

17 


IMITLN 

/SO SAVE IT IN "INITLN" 

M 

IE 

18 


1 


14 

IF 

AF 


XRAA 

/SET THE A REGI STER TO ZERO 

14 

21 

C9 


RET 

/AND RETUW 
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94 

21 

3E 

EVERY» 

HVIA 

/NO LINE NUH8ERS VERE EH TER ED. SO 

94 

22 

02 


002 

/SET A TO TVO AND RETUJH. 

94 

23 

C9 


RET 





/CONVERI THE BIMARY VACUE BETVEEN 0 AND 9 70 ASCII 




/AND PRIN7 THE 

VALUE ON THE TTY OR CRT. 

94 

24 

C6 

BCDOUT. 

ADI 


94 

26 

B9 


269 


94 

26 

C3 


JNP 


94 

27 

or 


IOO 


94 

28 

18 


0 


94 

29 

Ar 

CUI ALL/ 

XRAA 

/SET ALL OF THE REGI STERS TO ZERO. 

94 

2A 

67 


MOVHA 


14 

2B 

6r 


NO VLA 


94 

2C 

a r 

CLNAE. 

XRAA 


94 

2D 

5 r 


HOVEA 


94 

2E 

57 


HOVDA 


94 

2 r 

4r 


HO VC A 


94 

39 

47 


HOVBA 


94 

31 

co 


RET 





/SEEX IS USED TO FINO THE FIRST CHARACTER IN THE LINE 
/THE TEXT BUFFER SPECIFIED BY THE LINE NIMBER 




/STO RED 

IN "INITLN " < PUT THERE BY A CALL TO "INPUT*). 

94 

32 

2A 

SEEX* 

LHLD 

/LO AD H AL VI TU THE LINE N UH BER OF THE 

94 

33 

17 


INITLN 

/LINE TO BE FOIMD IN THE TEXT BUFFER 

94 

34 

18 


8 


94 

35 

EB 


XCHG 

/NOVE THE N UH BER TO DAE 

94 

36 

2A 


LHLD 

/LOAD H4L WITH THE STARTING ADDRESS 

94 

37 

22 


TXTBUF 

/OF THE TEXT BUFFER. 

94 

38 

18 


9 


94 

39 

IB 

MXTSK* 

DCXD 

/DAE ARE THE INITIAL LINE 

94 

3A 

7A 


NOVAD 


94 

3B 

B3 


ORAE 

/ARE DAE 9 YET 7 

94 

3C 

ce 


RZ 

/YES. HAL ADDRESS THE LINE OF TEXT 
/THAT VE VERE LOOK IN G POR. 

94 

3D 

7E 

HORCHR* 

HOVAH 

/DAE ARE NOT ZERO. GET A CHAR. 

94 

3E 

23 


INXH 


94 

3F 

FÉ 


CPI 

/FOIMD THE END OF THE TEXT BUFFER? 

94 

49 

9B 


BTERH 


94 

41 

CA 


JZ 

/YES. THEN VE CAN NOT GO ANY FURTOER. 

94 

42 

EF 


NOGOOD 


94 

43 

93 


9 


94 

44 

FE 


CPI 

/FOIMD A CARRI AG E RETUJW IN THE 

94 

45 

9D 


CR 

/TEXT BUFFER? 

94 

46 

C2 


JMZ 

/NO. THEN KEEP LOOK IN G POR EITHER 

94 

47 

3D 


HORCHR 

/THE BUFFER TEMINATOR OR A CAR- 

94 

48 

94 


9 

/RIAGE RETUJM. 

94 

49 

CD 


CALL 

/FOIMD A CR. INCREMENT THE BCD 

94 

4A 

5D 


BFLINC 

/LINE N UH BER BY ONE. 

94 

4B 

94 


9 
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94 

*c 

C3 

JMP 

/THW DECREMENT THE LINE 

COUNT 

IN 

94 

4D 

39 

NXTSX 

/RESISTER PAIR D «ND SEE 

IF IT 

IS 

94 

4E 

94 

9 

/ZERO 




/"SEDU" IS U5ED TO CONTINUE THE SEARCH. STARTING 
/«NERE "SEBI* LEFT 0 TT. U9TIL THE N UN BER or LINES 
/SPECIFED BY "ADIFF" (USUALLY *FINLN* - "IN I TLN " 
/♦I# BUT SONETIHES "ADI FF* IS SET TO Ili 091) ARE 
/PASSED. 


94 

4 F 

ES SEEX 1 > 

PUSKH 

/SAVE THE ADDRESS FROM "SEtX" 

94 

59 

CI 

POPB 

/IN RESISTER PAIR B 

94 

SI 

EB 

XCHG 

/PUT THE ADDRESS IN D4E AL SO 

94 

se 

2A 

LKLD 

/THW GET THE "LINE COINT" FROM 

94 

53 

IB 

ADI FF 

/"ADIFF* (THE NUMBER OF LINES 

94 

54 

18 

9 

/TO BE SXIPPED) 

94 

SS 

EB 

XCHG 

/ADDRESS IN HAL. "ADIFF* IN D4E 

94 

96 

CD 

CALL 

/MOV SX1P THE BUI BER OF LINES 

94 

ST 

3D 

NORCHR 

/SPECI FI ED BY THE NtMBER IN 

94 

50 

94 

9 

/RESISTER PAIR D. 

94 

59 

EB 

XCHG 

/FINAL ADDRESS NOV IS IN D4E 

•4 

SA 

CS 

PUSHB 

/NOVE THE IN1TIAL ADDRESS DETERM IN ED 

94 

5B 

Et 

POPH 

/BY "SEEX" TO RESISTER PAIR H 

94 

se 

C9 

RET 

/RETURN WITH ADDRESSES IN D«E «ND H4L 


/THE BELINO BFI «ND BEO UT SUBROUTINES OPERATE ON THE 
/BCD LINE NUMBER STO RED IN TOUR MEMORY LOCATIONS 
/(ONE DIGIT PER LOCATION) STARTING AT "BFUNIT" TO 
/"BFTHOU". THESE LINE NUMBERS ARE PRIHTED 
/DURINO A LIST OPERATION. 

/INCREMENT THE BCD LINE N UH BER BY ONE 


94 

5D 

ES 

BELINO PUSHH 

94 

SE 

CS 

PUSHB 

94 

5F 

21 

LX1H 

94 

60 

4A 

BnMIT 

94 

61 

18 

9 

94 

62 

CD 

CALL 

94 

63 

F7 

LINCI 

94 

64 

05 

9 

94 

65 

CI 

POPB 

94 

66 

Et 

POPH 

94 

67 

C9 

RET 


/SET THE BCD LINE NIMBER TO 999 1 


94 

68 

ES BFI. 

PUSHH 

94 

69 

CS 

PUSHB 

94 

6A 

21 

LXIH 

94 

6B 

4A 

BFUNIT 

94 

6C 

18 

0 

94 

6D 

CD 

CALL 

94 

6E 

0B 

LINEI2 
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PA8E «6-tlS 


14 

6F 

06 


0 

04 

70 

CI 


PO PB 

04 

71 

E1 


POPH 

04 

72 

C9 


RET 




/PRINT 

THE BCD 

04 

73 

ES 

BFOUT, 

PUSHH 

04 

74 

C5 


PUSHB 

04 

75 

21 


LXIH 

04 

76 

40 


BFTHOU 

04 

77 

18 


0 

04 

78 

CD 


CALE 

04 

79 

1A 


LNNHBI 

04 

7A 

06 


0 

04 

78 

21 

BFOUT1# 

LXIH 

04 

7C 

39 


EQUI 

04 

7D 

12 


0 

04 

7E 

CD 


CALL 

04 

7F 

7A 


TOUT 

14 

80 

05 


0 

04 

81 

CI 


POPB 

04 

82 

Et 


POPH 

04 

83 

C9 


RET 
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/IF THE S (SEARCH) COMMAND 1S ENTERED. COME TO "FINDIT" 


04 

84 

3E 

FIMDI T, 

M VI A 

/PRINT AN EQUAL SIGN AFTER 

04 

85 

3D 


"»* 

/THE USER ENTERED THE S COMMAND. 

04 

86 

CD 


C ALL 


04 

87 

or 


IOO 


04 

88 

18 


0 


04 

89 

CD 


C ALL 

/SET THE BCD LINE NUMBERS USED ONLY 

04 

SA 

08 


LINEI 

/8Y THE S AND N COMMANDS TO 000 1 

04 

8B 

06 


0 


04 

se 

21 


LXIH 

/LOAD REGI STER PAIR H V1TH THE 

04 

8D 

4E 


STRING 

/R/V MEMORY ADDRESS VHERE THE 

04 

8E 

16 


0 

/USER'S STRING VILL BE STORED 

04 

8F 

16 


M VI D 

/LOAD THE D REGI STER VITH THE STRING 

04 

90 

13 


023 

/TEHNINATION CHARACTER «CTRL/S) 

04 

91 

CD 


CALL 

/INPUT THE STRING TO BE SEARCHED 

04 

92 

C8 


STRIN 

/POR AND SAVE IT IN "STRING". THE 

04 

93 

04 


0 

/STRING 1S TERM1NATED VITH A CTRL/S. 

04 

94 

3E 


MVIA 

/LOAD THE A RESISTER VITH 377 AND 

04 

95 

FF 


377 

/SAVE IT IN "STRFND*. THIS IS A 

04 

96 

32 


STA 

/"SENSE" MEMORY LOCATION. IF A STRING 

04 

97 

IF 


STRFND 

/IS FOUND THIS VILL BE SET TO ZERO. 

04 

98 

18 


0 

/IF NO STRING IS FOUND. IT VILL BE 377. 

04 

99 

2A 


LHLD 

/LOAD REGI STER PAIR H VITH THE 

04 

9 A 

22 


TXTBUF 

/STARTING ADDRESS OF THE TEXT BUFFER 

04 

9B 

18 


0 


04 

9C 

22 


SHLD 

/SAVE THIS ADDRESS IN "SRCADD* 

04 

9D 

1D 


SRCADD 

/POR THE CONTINUE-SERACH (NI 

04 

9E 

18 


0 

/COMMAND. 

04 

9F 

EB 


XCHG 

/MOVE THE ADDRESS TO D4E 

04 

A0 

CD 

NXTFND. 

CALL 

/PERFORM THE SEARCH. IF A MATCHING 

04 

Al 

E8 


NEVLIN 

/STRING IS POUND RETURN. IF NOT 

04 

A2 

04 


0 

/PRINT A 7 AND GO TO THE COMMAND MODE 

04 

A3 

21 

CON SU 

LXIH 

/A STRING VAS FOUND. SO SET "STRFND" 

04 

A4 

IF 


STRFND 

/TO ZERO. AL SO SET "EXOK " TO ZERO. 

04 

A5 

18 


0 

/THIS IS USED BY THE EXCHANGE CMD. 

04 

A6 

AF 


XRAA 


04 

A7 

77 


NO IMA 

/SET "STRFND" TO 0 POR THE SEARCH AND NEXT 

04 

A8 

23 


INXH 

/COMMANDS AND THEN SET THE NEXT LOCATION 

04 

A9 

77 


MO IMA 

/TO 0 POR THE EXCHANGE COMMAND 

04 

AA 

CD 


CALL 

/SET 'ADI FF* TO 098 001. POR THE 

04 

AB 

63 


DIFF1 

/L1STING OF THE STRING 

04 

AC 

03 


0 


04 

AD 

2A 


LHLD 

/SET HAL TO THE BEGINNING OF THE LINE 

04 

AE 

ID 


SRCADD 

/«THIS IS SET BY THE "NEVLIN* 

04 

AF 

16 


0 

/SUBRO UTINE) 

04 

B0 

3E 


MVI A 

/SET "PORL* TO L. SO THE LINE THAT 

04 

B1 

4C 


"L* 

/CONTA1NS THE MATCHING STRING CAN 

04 

B2 

32 


STA 

/BE LISTED. x 

04 

B3 

41 


PORL 


04 

B4 

18 


0 


04 

B5 

CD 


CALL 

/PRINT A CARRIAGE RETURN AND LINE FEED. 

04 

B6 

39 


CRLF 


04 

B7 

02 


0 
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>4 

B« 

ES 

PUSHH 


04 

B9 

cs 

PUSHB 


04 

BA 

CD 

CALL 

/PRINT THE LINE NUMBER VHERE THE 

04 

BB 

17 

LNNHB 

/MATCH OCCURRED. 

04 

BC 

06 

0 


04 

BD 

21 

LXIH 

/PRINT TUO SPACES 

04 

BE 

39 

EQUI 


04 

BF 

12 

0 


04 

CO 

CD 

CALL 


04 

CI 

7A 

TOUT 


04 

C2 

05 

0 


04 

C3 

CI 

PO PB 


04 

C4 

El 

POPH 


04 

C5 

C3 

JMP 

/AND THEN PRINT THE ENTI RE LINE 

04 

C6 

D4 

SCHAR 

/OF TEXT VHERE THE MATCH OCCURRED. 

04 

C7 

02 

0 



/“STRIN* IS USED TO INPUT A STRING AND SAVE IT IN THE 
/MEMORY LOCATIONS ADDRESSED BY REGI STER PAI R H. 

/THE STRINO IS TEfMINATED VHEN THE ASCII VALUE 
/EH TER ED E QUAL S THE CONTENT OF THE D REGI STER. 
/“STRIN* MUST ONLY BE C ALL ED V1TH MI ADDRESS IN 
/REGI STER PAIR H AND THE TEWINATION CHARACTER 
/IN THE D RESISTER. A MAXIMUM OF IS CHARACTERS 
/CAN BE ENTERED- 


14 

CS 

0E 

STRIN. 

M VIC 

/LOAD THE C REGI STER V1TH THE MAXIMUM 

04 

C9 

10 


020 

/NUMBER OF STRINO CHARACTERS THAT CAN 

04 

CA 

CD 

NSC1N. 

CALL 

/BE EN TER EDI GET A STRING CHARACTER 

04 

CB 

06 


IOECHO 


04 

CC 

18 


0 


04 

CD 

FÉ 


CPI 


04 

CE 

03 


CTRLC 

/CTRL-C GETS US OUT OF HERE 

04 

CF 

CA 


JZ 

/BACK TO THE COMMAND MODE. 

04 

DO 

6B 


QUEST 


04 

DI 

00 


1 


04 

D2 

BA 


CMPD 

/STRING TER11NATION CHARACTER? 

04 

D3 

CA 


JE 

/YES. THEN RETUIW FROM “STRIN" 

14 

D4 

DC 


ENDLST 


04 

D5 

04 


• 


04 

D6 

77 


MONNA 

/NEITHER. SAVE THE CHARACTER. 

04 

D7 

23 


1NXH 

/INCREMENT THE MEMORY ADDRESS 

94 

DS 

OD 


DCRC 

/DECREMENT THE STRING CHARACTER CO UN TER 

04 

D9 

C2 


JNZ 

/GET ANOTHER IF THE COtMT IS NON-ZERO 

04 

DA 

CA 


NSCIN 


04 

DB 

04 


0 


04 

DC 

36 

ENDLST. 

MVIM 

/END OF THE STRING. SAVE A TERMINATOR 

04 

DD 

00 


STERM 


04 

DE 

C9 


RET 



/THIS SUB ROUTINE ACTUALLY SEARCHES THE TEXT BUFFER 
/FOR A MATCHING STRING. THIS IS USED BY THE S 
/AND N COMMANDS. 
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04 

DF 

13 

ENTE5T# 

INXD 

/GET PAST THE CR IN THE TEXT BUFFER 

04 

E0 

EB 


XCHG 


14 

£1 

22 


SHLD 

/SAVE TH1S ADDRESS FOR THE 

04 

E2 

1D 


SRCADD 

/*NEXT* COMM AND <N>. 

04 

E3 

18 


0 


04 

E4 

EB 

NEH TRY/ 

XCHG 

/PUT THE ADDRESS BACK 1NTO DIE 

04 

E5 

CD 


CALL 


04 

E6 

F4 


L IN C 

/1NCREMENT THE DEC1MAL <BCD> LINE 

04 

E7 

05 


0 

/NUMBER 

04 

E3 

21 

NEVL1N/ 

LXIH 

/LO AD H*L VI TH THE ADDRESS VHERE 

04 

E9 

4E 


STRINO 

/THE USER SUPPLÌ ED STRING 1S STORED 

04 

EA 

18 


0 


04 

EB 

IA 

NXTCKK/ 

LDAXD 

/GET A CHARACTER FROM THE TEXT BUFFER 

04 

EC 

F E 


CP1 

/IS IT A CARRIAGE RETURN7 

04 

ED 

OD 


CR 


04 

EE 

CA 


JZ 

/YES* THBi START THE SEARCH AGA1N 

04 

EF 

DF 


ENTEST 

/IN THE NEXT LINE 

04 

F0 

04 


0 


04 

FI 

FE 


CPI 

/HAS THE END OF THE TEXT BUFFER 

04 

re 

9B 


BTERM 

/BEEN FOUNDT 

04 

F3 

C2 


JNZ 

/NO» THEN COMPARE THE TEXT BUFFER 

04 

F4 

01 


NOTERM 

/CHARACTER TO THE FIRST STRING 

04 

F5 

05 


0 

/CHARACTER* 

04 

F6 

3A 


L DA 

/VE FOUND THE END OF THE TEXT BUFFER. 

04 

F7 

1F 


STRFND 

/VERE ANY MATCHES FOIMD (AS INDI CATED 

04 

F8 

18 


0 

/BY THE CONTENT OF ’STRFND*) 7 

04 

F9 

FE 


CPI 


04 

FA 

rr 


377 


04 

FB 

CA 


JZ 

/NO MATCHES VERE FOUND» SO PR1NT 

04 

FC 

EF 


NOGOOD 

/A 7 AND THEN RETURN TO THE CON- 

04 

F D 

03 


0 

/MAND MODE* 

04 

F E 

C3 


JMP 

/AT LEAST ONE MATCH OCCURRED» SO 

04 

FF 

70 


QUESTI 

/ SIMPLY RETUIM TO THE COMM AND 

05 

00 

00 


0 

/MODE 

05 

01 

BE 

NOTERM/ 

CMPM 

/NOT A CR OR BTEM» COMPARE THE TEXT 

05 

02 

CA 


JZ 

/BUFFER CHARACTER TO THE USER'S STRING. 

05 

03 

09 


ONEOK 

/IT THEY ARE EQUAL» TRY MATCHING SOME 

05 

04 

05 


0 

/OTHER CHARACTERS. 

05 

05 

13 


INXD 

/NO MATCH» INCREMENT THE BUFFER ADDR. 

05 

06 

C3 


JMP 

/AND TRY FOR ANOTHER MATCH* 

05 

07 

EB 


NXTCHK 


05 

08 

04 


0 


05 

09 

EB 

ONEOK/ 

XCHG 

/A SINGLE CHARACTER MATCH OCCURRED» 

05 

OA 

22 


SHLD 

/SO SAVE THE ADDRESS VHERE THE 

05 

OB 

34 


ADDCNT 

/FIRST MATCH OCCURRED 

05 

OC 

18 


0 


05 

OD 

EB 


XCHG 


05 

OE 

13 

SMNXT# 

INXD 

/NOV TRY TO MATCH ALL OF THE RE- 

05 

OF 

23 


INXH 

/HAINING CHARACTERS IN THE STRING 

05 

IO 

IA 


LDAXD 

/GET A TEXT BUFFER CHARACTER 

05 

11 

BE 


CMPM 

/COMPARE THE STRING CHARACTER 

OS 

12 

CA 


JZ 

/THEY ARE EQUAL» KEEP PER FORMINO 
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15 

13 

0E 

5NNXT 

/COMPARI SONS UNTIL THEY ARE NOT 

05 

14 

05 

0 

/EQUAL. 

05 

15 

7E 

MOVAM 

/NO EONGER EQUAL» IS IT BECAUSE 

15 

16 

FE 

CPI 

/THE TEXT BUFFER CKARACTER VAS 

15 

17 

00 

STERM 

/COMPARSO TO THE STRING TERMINATOR? 

15 

18 

C2 

JNZ 

/NO» IT VAS NOT THE STRING TER¬ 

15 

19 

E8 

NEVE IN 

MINATOR» THE STRINGS JUST DO 

15 

1A 

04 

0 

/NOT MATCH. 

15 

1B 

EB 

XCHG 

/FOWD THE STRING TERMINATOR 

05 

1C 

22 

SHED 

/THEY HATCHEO “COMPEETEEY" SO SAVE 

03 

ID 

36 

MMEVAE 

/THE ADDRESS OF THE END OF THE STRING 

• 5 

1E 

18 

0 

/IN THE TEXT BUFFER (POR EXCHANGINO 

05 

1F 

C9 

RET 

/RETURN» A MATCH OCCURRED- 


/IT THE N CN EXT) COMM AND IS EMTERED» THE 8«8I HAS TO 
/CONTINUE THE SEARCH» STARTING VERE IT LEM OFF 
/FROH THE S (SEARCH) COHMAND. WHEN THE N INEXT) 

/COMM AND IS IN TER ED» 'CONSER* (CONTINUE SBARCHINO 
/IS EX E CUT ED. HO VE VER. BEPORE THE SEARCH IS CONTINUE!)» 
/VE HAVE TO MAX E SURE THAT IT VAS STARTEDI 


OS 

20 

21 

CONSER» 

LXIH 

/LO AD H AL VI IH THE MEMORY ADDRESS 

03 

21 

IF 


STRIND 

/VHERE THE SEARCH SENSE REGI STER 

05 

22 

18 


0 

/IS STORED. 

03 

23 

3E 


MVt A 

/LOAD THE A RESISTER VITH *NO 

05 

24 

FF 


377 

/HATCHES OCCURRED* 

05 

25 

BE 


CMPM 

/COMPARE IT TO “STRINO* 

03 

26 

77 


NOWA 

/SET ’STRFND* TO 377 ANYVAY 

05 

27 

CA 


JZ 

/IF NO HATCHES OCCURRED VITH THE S 

05 

28 

6B 


QUEST 

/(SEARCH) COHMAND OR THE N COMM AND 

05 

29 

00 


0 

/ENTERED» VE CAN NOT CONTINUE 

05 

2A 

2A 


LHLD 

/A MATCH DID OCCUR THE LAST TIME 

«5 

2B 

ID 


SRCADD 

/THE S (SEARCH) CMD VAS USED» GET 

05 

2C 

18 


0 

/THE ADDRESS VHERE HE SHOULD CONTINUE 

05 

2D 

7 E 

FCR» 

MOVAM 

/NOV ADVANCE THE ADDRESS IMTIL THE 

05 

2E 

23 


INXH 

/BEGINNING OF THE NEXT LINE OF TEXT 

05 

2 F 

FE 


CPI 

/IN THE TEXT BUFFER IS FOIMD. THE 

05 

30 

OD 


CR 

/SEARCH CAN TKEN CONTINUE VITH THIS 

05 

31 

C2 


JNZ 

/LINE OF TEXT. 

05 

32 

2D 


FCR 


05 

33 

05 


0 


05 

34 

22 


SKLD 

/FOIMD THE BEGINNING OF THE NEXT 

05 

35 

ID 


SRCADD 

/LINE OF TEXT» SAVE ITS ADDRESS* 

05 

36 

18 


0 


05 

37 

CD 


CALI. 

/INCREMB4T THE LINE NIX BER 

OS 

38 

14 


NINTRY 

/AND THEN SEARCH FOR THE 

05 

39 

04 


0 

/NEXT OCCURRHNCE OF THE SAME STRING 

05 

3A 

C3 


JMP 

/(THE STRING BEING SEARCHED FOR 

OS 

3B 

A3 


CON SI 

/IS STILL IN -STRING*) 

05 

3C 

04 


0 
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/•TAPEI* IS USED VHEN A SOURCE PAPER TAPE MUST BE 
/PUNCHED DUE TO THE P «PINCHI COMHAND OF THE EDITOR. 


05 

3D 

7E 

TAPEI, 

MOVAM 

/GET A CHARACTER FROH THE TEXT BUFFER 

OS 

3E 

FE 


CPI 

/IS IT A CARRIAGE RETUIM? 

«5 

3F 

OD 


CR 


05 

40 

CA 


JZ 

/YES, THEN PUH CH A CARRI AGE RETURN 

05 

41 

4F 


OKCR 

/AND A LINE FEED AND DECREMENT THE 

OS 

42 

05 


0 

/LINE COUNT 

05 

43 

FE 


CPI 

/IS IT THE TEXT BUFFER TEM IN ATION 

05 

44 

9B 


BTERH 

/CHARACTER? 

05 

45 

CA 


JZ 

/YES, THEN PINCH TRAILER BEFORE 

05 

46 

15 


TRLR 

/RETURN IMG TO THE COMHAND MODE 

05 

47 

03 


0 


05 

48 

CD 

CO UT, 

CALL 

/NOT A CR OR BTERM, SO P1MCH IT 

05 

49 

09 


IOP 

/ON THE I/O PINCH DEVI CE 

05 

4A 

18 


0 


05 

4B 

23 

NXTLOC, 

IMXH 

/INCREMENT THE TEXT BUFFER ADDRESS 

05 

4C 

C3 


JMP 

/THEN GET ANOTHER CHARACTER AND 

05 

4D 

3D 


TAPEI 

/POSSIBLY PINCH IT. 

05 

4E 

05 


0 


05 

4F 

CD 

OKCR, 

CALL 

/READ A CR FROH THE TEXT BUFFER, SO 

05 

50 

61 


PCRLF 

/PINCH A CARRI AGE RETU1M AND A LINE 

05 

51 

05 


0 

/FEED ON THE PAPER TAPE, 

05 

52 

C3 


JMP 

/THEN DECREMENT THE LINE COUNT 

05 

53 

FC 


ENDPL 

/IN A SECTION OF THE. *LIST* 

05 

54 

02 


0 

/ IN STRUCTION S, 




•/-LDR- 

PUNCH E S 

100 CHARACTERS COCTAL 200, HEX 80) ON 




/PAPER 

TAPE, 

“LDR" IS CALL ED BOTH VHEN A SOURCE AND 




/AN OBJECT VERSION OF THE PROGRAM 1S PIMCHED. 

05 

55 

0E 

L DR, 

MVIC 

/LOAD THE C REGI STER HITH DECI MAL 100 

05 

56 

64 


144 


05 

57 

3E 

LORI, 

HVIA 

/LOAD THE A REG. VI TH THE VALUE TO 

05 

58 

80 


200 

/BE PUNCHED «OCTAL 200, HEX 80> 

05 

59 

CD 


CALL 

/PUNCH THE CONTENT OF THE A 

05 

SA 

09 


IOP 

/REGI STER ON THE I/O PUNCH 

05 

5B 

18 


0 

/DEVI CE, 

05 

5C 

OD 


DCRC 

/DECREMENT THE COUNT 

05 

SD 

C2 


JNZ 

/IT THE COUNT IS NON-ZERO, PUNCH 

05 

SE 

57 


LDR1 

/THE SMIE CHARACTER AGAIN 

05 

5 r 

05 


1 


05 

60 

C9 


RET 


05 

61 

3E 

PCRLF, 

MVIA 

/PUNCH A CARRAGE RETU1M AND A 

05 

62 

8D 


215 

/LINE FEED ON THE PUNCH DEVI CE, 

05 

63 

CD 


CALL 


05 

64 

09 


IOP 


05 

65 

18 


0 


05 

66 

3E 


M VIA 


05 

67 

8A 


212 


05 

68 

C3 


JMP 
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•5 69 09 IOP 

15 6A 18 I 

/ir THE C (CHANCE) CO KHAN D IS ENTEREO, THE INSTRUC- 
/TIONS AT “CHANGE* ARE EX E CUT ED. THIS HEANS THAT 
/THE SPECI FI ED LINE Or TEXT IS FIRST DELETED. AND 
/THEN THE “INSERT" 1NSTRUCTIONS ARE EX EC UT ED SO THAT 
/A NEW LINE Or TEXT CAN BE ADDED TO THE TEXT BUrrER.. 
15 6B CD CHANGE, CALL /GET THE LINE NUM BER or THE LINE 

15 6C C2 INPUT /Or TEXT TO BE "CHANGED* 

15 6D 03 0 

OS 6E CD CALL ZIErC RETURJWOR C 3-5 IS EMTERED, 

05 6E 26 CHX1T /PRINT A 7 AND RETUIH TO THE CON- 

05 70 06 0 /NAND MODE. ONLY ONE LINE CAN BE 

05 71 CD CALL /CHANGED. RETURN ir ONLY ONE LINE 

05 72 63 Dim /NCMBER VAS ENTERED. ir SO, SET 

05 73 03 0 /“ADIFF* TO 000 001. 

05 74 CD CALL /DOLETE THE LINE O T TEXT 

05 75 4D DELI T 

05 76 03 0 

05 77 C3 JMP /THEN GEE A LINE Or TEXT TO IN- 

05 78 71 CINGI /SERT AND INSERT IT. 

05 79 03 0 

/■TOUT* IS A GENERAL-PURPOSE SUB ROUTINE THAT IS USED 
/TO PRINT ASCII MESSAGE STORED IN MEMORY ON THE I/O 
/OUTPUT DEVI CE. *TOUT“ IS CALL ED VITH THE ADDRESS 
/Or THE MESSAGE IN REGI STER PAIR H. A ZERO MUST 
/BE STORED IN MEMORY AT THE END Or THE MESSAGE. 


05 

7A 

7 E TOUT, 

MOVAM 

/GET A CHARACTER FROM MEMORY 

05 

7B 

re 

CPI 

/IS IT THE MESSAGE TERMINATOR? 

05 

7C 

00 

STERM 


05 

7D 

C8 

RZ 

/YES, THEN VE ARE DON E. 

05 

7E 

CD 

CALL 

/NOT A TERMINATOR, PRINT THE 

05 

7P 

or 

IOO 

/ASCII CHARACTER ON THE I/O 

05 

80 

18 

0 

/OUTPUT DEVI CE 

OS 

81 

23 

1NXH 

/INCREMENT THE MEMORY ADDRESS 

05 

82 

C3 

JMP 

/THEN GET ANOTHER CHARACTER AND 

05 

83 

7A 

TOUT 

/SEE VHAT IT IS. 

05 

84 

05 

0 



/ir THE Q (QUERY) COMM AND IS ENTERED, VE HAVE TO 
/PRINT THE HIGHEST ADDRESS USED, THE HIGHEST AD- 
/DRESS AVAILABLE AND THE NUMBER O T LINES IN THE 
/TEXT surrER. 

MEMOUT, CALL /PRINT A CARRI AGE RETUW AN D 

CRLP /A LINE rEED ON THE IOO DEV1CE. 

0 

LHLD /SET H«L • TO THE HIGHEST ADDRESS 
HIADD /USED BY THE TEXT BUrrER. 

0 

CALL /PRINT THIS ADDRESS 


05 85 CD 
05 86 39 
05 87 02 
05 88 2A 
05 89 14 
05 8A 18 
05 8B CD 
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OS 

8C 

AD 


HLOUT 


05 

8D 

05 


0 


05 

8 E 

CD 


CALL 

/THEN TYPE A CR MD LF 

05 

8 r 

39 


CRLF 


OS 

90 

12 


0 


05 

91 

2A 


LKLD 

/SET HAL - TO THE LAST R-V 

OS 

92 

24 


END RAM 

/HEMOHY LOCATION THAT VAS 

05 

93 

18 


8 

/ALLOCATED BY THE USER. 

05 

94 

CD 


CALL 

/AND THEN TYPE IT OUT. 

OS 

95 

AD 


HLOUT 


05 

96 

05 


0 


05 

97 

CD 


CALL 

/COIMT THE NUMBER OF LINES 

05 

96 

26 


CNTLN 

/IN THE TEXT BUFFER 

05 

99 

01 


0 


05 

9A 

CD 

CAT# 

CALL 

/TYPE A CR. THEN AN LF 

OS 

9B 

39 


CRLF 


05 

9C 

02 


0 


05 

9D 

21 


LXIH 

/LOAD REGI STER PAIR H VITH THE 

05 

9E 

30 


LNER+4 

/ADDRESS OF THE HESSAGE 'LINE A" 

05 

9F 

12 


0 


OS 

AO 

CD 


CALL 

/PRINT THE HESSAGE "LINE A" 

OS 

Al 

7A 


tout 


05 

A2 

05 


0 


OS 

A3 

23 


INXH 

/INCRETIDOT THE ADDRESS PAST THE 0 

05 

A4 

CD 


CALL 

/THEN PRINT THE HESSAGE "■ * 

05 

A5 

7A 


TOUT 

/VHICH IS STORED IN HEMORY JUST 

05 

A6 

05 


0 

/AFTER "LINE #" 

05 

A7 

CD 


CALL 


05 

A8 

73 


BFOUT 

/PRINT THE NUMBER OF LINES 

05 

A9 

04 


0 


05 

AA 

C3 


JMP 

/THEN GET ANOTHER COMM AND 

05 

AB 

70 


QUESTI 


OS 

AC 

00 


0 





/TRIS SUBROUTIN E PRINTS THE CONTENT OF REGI STER PAI! 




/H ON THE 100 DEVI CE AS EITHER OCTAL OR HEXADECIMAL 




/NUHBERS» BASED 

ON THE STATE OF THE ""HORO" HEMORY 




/LOCATION. IF 

IT CONTAINS OCTAL 110 (HEX 48J ASCII 




/H> HEX 

IS US ED. 

. OTHERVI SE OCTAL IS USED- 

05 

AD 

7C 

HLOUT, 

MOVAH 

/GET THE H REGI STER 

05 

AE 

CD 


CALL 

/PRINT IT AS EITHER OCTAL OR 

05 

AF 

B2 


OCTOUT 

/HEX ON THE IOO DEVI CE. 

05 

BO 

05 


0 


05 

B 1 

7D 


HO VAL 

/THEN GET L AND PRINT IT 

05 

B2 

4F 

OCTOUT, 

HOVCA 

/SAVE THE NU1BER IN REGI STER C 

05 

B3 

3A 


LDA 

/ARE VE TO PRINT HEXADECIMAL OR 

05 

B4 

3E 


HORO 

/OCTAL NUHBERS 7 

OS 

B5 

18 


0 


05 

B6 

FE 


CPI 


05 

B7 

48 


-H" 


05 

B8 

C2 


JNZ 

/"HORO" DOES NOT CONTAIN AN ASCII 

05 

B9 

D8 


OCT1 

/H, SO THE NUHBERS VILL BE PRINTED 

05 

BA 

OS 


0 

/IN OCTAL 
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05 

BB 

79 

HOVAC 

/■«ORO- CONTAINS AN H» PRINT HEX 

05 

BC 

E6 

ANI 

/SAVE THE FOTO MSBS 

05 

BD 

F0 

360 


05 

BE 

0F 

RRC 

/ROTATE THEM INTO THE FOUR LSBS 

05 

BF 

0F 

RRC 


05 

CO 

0F 

RRC 


05 

CI 

0F 

RRC • 


05 

C2 

CD 

CALL 

/CONVERT THE BINARY VACUE TO 

05 

C3 

CE 

PHEX 

/ASCI I - RASED HEXADECIMAL AND 

05 

C4 

05 

0 

/THW PRINT THE CHARACTER 

05 

C5 

79 

HOVAC 

/GET THE SAME 8-B1T NUMBER AGAIN 

05 

C6 

E6 

ANI 

/SAVE THE FOUR LSBS 

05 

C7 

or 

017 


05 

C8 

CD 

CALL 

/CON VERT THE BINARY VALUE TO 

15 

CO 

CE 

PHEX 

/ASCI I-BASED HEXADECIMAL AND 

05 

CA 

05 

0 

/PRINT IT. 

05 

CB 

C3 

JHP 

/THBI PRINT A SPACE AFTER THE TVQ 

05 

CC 

E F 

SPCAFT 

/DIGIT HEXADECIMAL NUMBER. 

05 

CD 

05 

0 
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OS 

CE 

FE 

PHEX/ CP1 

/ISA 0-9 TO BE PRINTED? 

OS 

CF 

OA 

012 


05 

DO 

DA 

JC 

/YES# THIN ADD 260 TO THE CONTENT 

OS 

DI 

24 

bcdout 

/Or THE A REGI STER M D PRINT THE 

05 

D2 

04 

0 

/RESULT. 

05 

D3 

C6 

ADI 

/ITS A-F# ADD 267 

05 

DA 

B7 

267 


05 

D5 

C3 

JMP 

/AND THEN PRINT IT. 

05 

D6 

OF 

IOO 


05 

D7 

18 

0 





/THIS SECTION OF OCTOUT IS USED TO PRINT THE CONTENT 




/OF THE A REGI STER IH THE FORM OF THREE OCTAL DIGITS 

05 

D8 

79 

OCT1# MOVAC 

/GET THE NUMBER 1NTO A. 

05 

09 

E6 

ANI 

/SAVE THE TVO MSBS IN THE A REG. 

05 

DA 

CO 

300 


05 

DB 

07 

RLC 

/ROTATE THEM 1NTO THE TVO LSBS 

05 

DC 

07 

RLC 


05 

DD 

CD 

CALL 

/ADD 260 TO THE RESULT AND PRINT 

05 

DE 

24 

BCDOUT 

/IT ON THE I/O OUTPUT DEVI CE 

OS 

DF 

04 

0 


05 

EO 

79 

MOVAC 

/GET THE SANE NUMBER INTO A AGAIN 

05 

E1 

E6 

ANI 

/SAVE THE THREE “MIDDLE" BITS 

05 

£2 

38 

070 


OS 

E3 

OF 

RRC 

/ROTATE THEM INTO THE THREE LSBS 

OS 

ZA 

OF 

RRC 


05 

ES 

OF 

RRC 


OS 

E6 

CD 

CALL 

/ADD 260 TO THE RESULT AND PRINT 

05 

E7 

24 

BCDOUT 

/IT ON THE I/O OUTPUT DEV1CE. 

05 

za 

04 

0 


05 

E9 

79 

MOVAC 

/GET THE SANE NUMBER AGAIN 

05 

EA 

E6 

ANI 

/SAVE THE THREE LSBS 

05 

EB 

07 

0 07 


05 

EC 

CD 

CALL 

/ADD 260 TO THE RESULT AND PRINT 

05 

ED 

24 

BCDOUT 

/IT ON THE I/O OUTPUT DEVI CE. 

05 

EE 

04 

0 


OS 

EF 

3E 

SPCAFT. MVIA 

/PRINT A SPACE AFTER THE NUMBER 

05 

F0 

AO 

240 


05 

FI 

C3 

JMP 


05 

F2 

OF 

IOO 


05 

F3 

18 

0 





/THE LINO LINEI AND LNNNB SUBROUTINES ARE USED TO 




/GENERATE LINE 

NUMBERS USED VITH THE S (SEARCH) AND 




/N CN EXT) COMMANDS. THEY ARE AL SO USED TO GENERATE 




/LINE NUMBERS TOR ERROR MESSAGES DUR1NG THE AS- 




/ SEMELY PROCESS. 




/THIS SUBROUTINE INCREMENTS THE BCD LINE NUMBER BY I 

05 

F4 

21 

LINO LXIH 


05 

F5 

28 

UN I T 


05 

F6 

18 

6 
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ts 

F7 

OE 

LINCI# 

MVIC 


95 

rs 

04 


004 

/# OF DECIMAL DIGITS 

05 

F9 

34 

NXTNEM. 

INRM 


05 

FA 

7 E 


MOVAM 


05 

FB 

FE 


CPI 


• 5 

FC 

BA 


272 

/I MORE THAN 9 

05 

FD 

D8 


RC 

/YES# 272 VAS BIGGER THAN THE » 

05 

FE 

36 


MVIM 


OS 

FF 

BO 


260 


06 

00 

23 


INXH 


06 

SI 

OD 


DCRC 


06 

OS 

C2 


JNZ 


06 

03 

F9 


NXTNBM 


86 

04 

OS 


0 


06 

05 

C3 


JHP 

/SOMETHINGS VRONG BECAUSE THE 

16 

06 

EF 


NOGOOD 

/NUMBER IS GREATER THAN 4 DIGITS 

06 

07 

03 


0 

/OR 9.999» SO POP THE RET AND 7, C» 




/THIS SUBROUTINE SETS THE BCD LINE NUMBER TO 000 1. 

06 

08 

21 

LINEI# 

LXIH 

/THIS SETS THE LINE CO IN TER TO 000 1 

06 

09 

28 


UN IT 


06 

0A 

18 


0 


06 

OB 

36 

LINE12. 

MVIM 

/SAVE Mi ASCII 1 IN MEMORY 

06 

OC 

B1 


261 


06 

OD 

OE 


MVIC 

/THEN SAVE THREE ASCII 0 *S IN THE 

06 

OE 

03 


003 

/NEXT THREE CONSECUTIVE MEMORY LOCATIONS 

06 

OF 

23 

3 ERO IT. 

INXH 

/INCREMENT PAST THE ASCII 1 

06 

IO 

36 


MVIM 

/SAVE AN ASCII 0 

06 

11 

BO 


260 


06 

12 

OD 


DCRC 

/THREE OF THEM SAVED YET 7 

06 

13 

C2 


JNZ 

/NO. SAVE ANOTHER ASCII 0 

06 

14 

OF 


ZEROIT 


06 

15 

06 


1 


06 

16 

C9 


RET 

/YES. VE SAVED 000 1 IN MEMORY 




/THIS SUBROUTINE PRINTS THE FOUR-DIGIT BCD LINE NUMBER 

06 

17 

21 

LNNMB# 

LXIH 

/TYPE OUT THE 4 DIGIT 

06 

18 

2B 


THOU 

/DECIMAL #. 

06 

19 

18 


0 


06 

IA 

OE 

LNNHBI. 

MVIC 

/C-THE DIGIT CO UN TER (CURRENTLY 4) 

06 

IB 

04 


004 


06 

IC 

7E 

NPRINT# 

MOVAM 

/GET A BCD DIGIT FROM MEMORY (ASCII) 

06 

ID 

CD 


CALL 


06 

1E 

OF 


IOO 

/MD PRINT IT OUT 

06 

1F 

18 


0 


06 

20 

2B 


DCXH 

/DECREMENT H AL TO A LE SS SIOIIFICANT DIGIT 

06 

21 

OD 


DCRC 

/DECREMENT THE DIGIT COUNTER 

06 

22 

C8 


RZ 

/PRINTED ALL FOUR DIGITS# SO RETURN 

06 

23 

C3 


JMP 

/HAVEN'T PRINTED 4 YET# KEEP GOING 

06 

24 

IC 


NPRINT 


06 

25 

06 


0 
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/-CKKIT- IS C ALL ED BY SOME "COMMANDS' IF ONLY 
/ONE LINE NUMBER CAN BE SPECI FI ED IN THE CONMM4D 
/(INSERT AND CHANGE). IF ONLY ONE LINE NUMBER 
/WAS ENTERED BY THE USER. CONTROL RETU7H S FROM 
/THE SUBROUTINE. OTHERVI SE* CONTROL RETU1NS TO 
/THE COMM AND DECODER ( CONMAN D MODE). 


06 

26 

FE 

CKKIT# 

CPI 

/A-001 OR 002 7 

06 

27 

01 


001 


06 

28 

D8 


RC 


06 

29 

C3 


JMP 


06 

2A 

EF 


NOGOOD 


06 

2B 

03 


0 





/•CLEAN' 

’ IS USED VHEN TEA 1S STARTED WD NO SOURCE IS 




/CURRENTLY STORED IN MEMORY OR VHEN THE EH TI RE TEXT 




/BUFFER 

IS DELETED. 

06 

2C 

2A 

CLEAN# 

LHLD 

/GET THE USER ESTABLISHED "IMITIAL 

06 

2D 

22 


TXTBUF 

/ADDRESS* FOR THE TEXT BUFFER. 

06 

2E 

18 


0 


06 

2F 

36 


MVIM 

/SAVE A BUFFER TEWINATOR AT THE 

06 

30 

9B 


BTERM 

/BEGINNING OF THE TEXT BUFFER 

06 

31 

22 


SHLD 

/SAVE THE ADDRESS AS THE 

06 

32 

14 


HIADD 

/HIGHEST ADDRESS USED 

06 

33 

18 


0 


06 

34 

22 


SHLD 

/ALSO IN 1 TI AL ICE "SRCADD* VHICH 

06 

35 

1D 


SRCADD 

/IS USED BY THE N (NEXT) COMM AND 

06 

36 

18 


0 


06 

37 

22 


SHLD 

/ALSO 1NIT1AL1ZE "TFCLIN" <TEXT- FIRST 

06 

38 

2E 


TFCLIN 

/CHARACTER IN A LINE) FOR THE ASSEMBLER 

06 

39 

18 


0 


06 

3A 

21 


LX1H 

/LOAD REGI STER PAIR H VITH THE R/V 

06 

3B 

A8 


BUFF2 

/MEMORY ADDRESS VHERE THE ONE-LINE 

06 

3C 

18 


0 

/(MINI-BUFFER) IS. 

06 

3D 

2B 


DCXH 

/DECREMENT THE ADDRESS 

06 

3E 

36 


MVIM 

/AND SAVE A CR "JUST IN FRONT OF" THE 

06 

3F 

OD 


CR 

/SINGLE LINE OF TEXT 

06 

40 

2E 


MVIL 

/LOAD REGI STER PAIR H VITH 377 377 

06 

41 

FF 


377 

/AND SAVE THE VALUE IN R/V MEMORY. 

06 

42 

26 


MVIH 


06 

43 

FF 


377 


06 

44 

22 


SHLD 

/THIS " IN DI CATES" THAT NO MATCHES HAVE 

06 

45 

IF 


STREND 

/BEEN FOUND AND THAT THE EXCHANGE 

06 

46 

18 


0 

/ CONMAN D CAN NOT BE USED 

06 

47 

CD 


CALL 

/THEN SET ALL OF THE REGI STERS 

06 

48 

29 


CLNALL 

/TO ZERO 

06 

49 

04 


0 


06 

4A 

32 


STA 

/CLEAR THE READER-XEYBOARD SVITCH 

06 

4B 

40 


ROR8 

/TO THE KEYBOARD MODE 

06 

4C 

18 


0 


06 

4D 

22 


SHLD 

/AND THEN SET "INITLN". TO ZERO 

06 

4E 

17 


INITLN 


06 

4F 

18 


0 
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06 SO C9 RET 

/THESE ARE THE GENERAL-PURPOSE I/O SUBROUTINES THAT 
/TEA ACCESSES THROUGH THE I/O JUHP TABLE. THESE 
/SUBROUTINES Otti BE MODI FI ED OR HEV SUBROUTINES 
/Otti BE ADDED AND ACCESSED THROUGH A MODI FI ED JUMP 
/TABLE. 


06 

SI 

DB 

INCHK. 

IN 

/JUST GET THE KEYBOARD FLAG 

06 

52 

01 


001 


06 

53 

E6 


AN I 

/AND SET THE FLAGS BASED Oli ITS STATE 

06 

54 

01 


001 


06 

55 

C9 


RET 


06 

56 

D3 

IORDR. 

OUT 

/PULSE THE READER CONTROL RELAY 

06 

57 

01 


001 


• 6 

58 

00 


0 

/THERE IS ENOUGH ROOM HERE POR ANY 

06 

59 

00 


0 

/TIME DELAY SOFTWARE REQU1 RED FOR A 

06 

5A 

00 


0 

/SOFTWARE CON TROLL ED READER-CONTROL 

06 

5B 

00 


0 

/RELAY. 

16 

se 

00 


0 


16 

5D 

01 


0 


06 

5E 

00 


0 


06 

51 

00 


0 


06 

60 

00 


0 


06 

61 

00 


0 


16 

62 

00 


0 


06 

63 

00 


0 


06 

64 

00 


0 


06 

65 

00 


0 


06 

66 

00 


0 


06 

67 

00 


0 


06 

68 

00 


0 


06 

69 

00 


0 


06 

6A 

DB 

TTYI, 

IN 

/GET THE PRINTER'S ttlD KEYBOARD # S 

06 

6B 

01 


001 

/FLAOS 

06 

6C 

E6 


ANI 

/SAVE JUST THE KEYBOARD'S FLAG 

06 

6D 

01 


001 


06 

6E 

CA 


JZ 

/IF THE FLAG IS ZERO. WA1T FOR IT 

06 

6F 

6A 


TTYI 

/TO BE A LOGIC ONE. MEANING THAT A 

06 

70 

06 


0 

/KEY HAS BEEN PRESSED. 

06 

71 

DB 


IN 

/A KEY WAS PRESSED. INPUT ITS 

06 

72 

00 


000 

/ASCII VALUE. 

06 

73 

E6 


ANI 

/MASK OUT ANY PARITY BIT 

06 

74 

7 F 


177 


06 

75 

C9 


RET 

/AND RETUIM WITH IT IN THE A REGI STER 

06 

76 

CD 

TTYIN» 

C ALL 

/GET A KEY BOARD CHARACTER 

06 

77 

6A 


TTYI 

/AND PRINT IT. 

06 

78 

06 


0 


06 

79 

47 

TTYOUT. 

HOVBA 

/SAVE THE CHARACTER IN B 

06 

7A 

DB 


IN 


06 

7B 

01 


001 


06 

7C 

E6 


ANI 
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06 

7D 

04 

004 

/CHECK TO SEE IF THE PRIMTER 

06 

TE 

CA 

JZ 

/IS READY. IT ISN'T# KEEP CHECK IMG 

06 

7 r 

7A 

TTYOUT* 1 

06 

80 

06 

0 


06 

81 

78 

MOVAB 

/PRINTER IS READY# GET THE CHARACTER 

06 

82 

D3 

OUT 


06 

83 

00 

000 

/AND PR1NT IT 

06 

84 

CD 

CALL 

/SEE IF ANY KEYS HAVE BEEN PRESSED 

06 

85 

00 

IOTEST 


06 

86 

18 

0 


06 

87 

78 

MOVAB 

/GET THE PRINTER CHARACTER BACK IN A 

06 

88 

C8 

RZ 

/NO KEYS PRESSED 

06 

89 

CD 

CALL 

/A KEY VAS PRESSED# FINO OUT VHAT IT 

06 

8A 

03 

IONOEC 


06 

8B 

18 

0 


06 

8C 

FE 

CPI 


06 

8D 

03 

CTRLC 

/VAS A CTRL-C TYPED INT 

06 

8E 

78 

MOVAB 

/GET THE OLD PRINTER CHARACTER 

06 

8F 

CO 

mz 

/NO# NOT A CNTRL-C# SO IGNORE IT 

06 

90 

31 

LXISP 

/IT VAS A CNTRL-C# 

06 

91 

A0 

STACK 

/RESET THE STACK POINTER 

06 

92 

18 

0 


06 

93 

C3 

JMP 

/AND SEE VHAT THE USER'S UP TO 

06 

94 

6B 

QUEST 


06 

95 

00 

0 
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/"MNEXC" IS EX EC UT ED ir THERE IS MOT ENOUGH R/H 
/MSHORT FOR THE TEXT BUFFER OR THE ASSEMBLER'S SYM- 
/BOL TABLE AND DEF1MED-BYTE TABLE COLLIDE. 


06 

96 

21 

MMEXC. 

LXIH 

/LO AD REGI STER PAIR H VITH THE AD- 

06 

97 

F3 


NEA1C 

/ORESS FOR THE HEI ERROR KESSAGE. 

06 

98 

11 


0 


06 

99 

CD 


CALL 

/PR1NT THE HESSAGE 

06 

9A 

7A 


TOUT 


06 

9B 

OS 


0 


06 

9C 

C3 


JHP 

/THEN EH TER THE COMHAND MODE. 

06 

9D 

70 


QUESTI 

/REGARDLESS OF THE OPERATIOM 

06 

9E 

00 


0 

/THAT CAUSED THE ERROR. 

06 

9F 

21 

EXCHG. 

LXIH 

/HAVE AMY STRIMGS BEEN FOIND THAT HE 

06 

A0 

ir 


STREMO 

/CAN EXCHANGE7 

06 

Al 

18 


0 


06 

A2 

7E 


MOVAM 


06 

A3 

FÉ 


CPI 


06 

A4 

FF 


377 


06 

A5 

CA 


JZ 

/NO. NO STRIMGS 

06 

A6 

6B 


QUEST 


06 

A7 

00 


0 


06 

A8 

23 


1MXH 

/YES. THERE WAS A MATCH 

06 

A9 

3E 


H VI A 

/HAS AH EXCHANGE AL READY 

06 

AA 

FF 


377 

/TAKEN PLACE? 

06 

AB 

BE 


CMPM 


06 

AC 

77 


HO IMA 


06 

AD 

CA 


JZ 

/YES. THEN HE CAN MOT EXCHANGE AGA1N. 

06 

AE 

6B 


QUEST 


06 

AF 

00 


0 


06 

B0 

CD 


CALL 

/A STRING HAS FOUND THAT HAS MOT BEEN 

06 

Bl 

06 


lOECHO 

/PREVIOUSLY EXCKANGED. SO GET A COM- 

06 

B2 

18 


0 

/MAND 

06 

B3 

FE 


CPI 

/HANT TO EXCHAN GE THE SAN E STRING? 

06 

B4 

53 


*s* 


06 

B5 

CA 


JZ 

/YES. DELETE THE OLD ONE AND 

06 

B6 

CS 


DAI £S 

/ADD THE NEH ONE. 

06 

B7 

06 


0 


06 

B8 

FE 


CPI 

/IS THE COMMAND E-? 

06 

B9 

3D 


*.* 


06 

BA 

C2 


JMZ 

/NO. THEN IGNORE THE COMMAND 

06 

BB 

6B 


QUEST 


06 

BC 

00 


0 


06 

BD 

21 


LXIH 

/YES. LOAD REGI STER PAIR H HITH 

06 

BE 

64 


EXSTR 

/R/H MEMORY ADDRESS HHERE THE 

06 

BF 

18 


0 

/NEH STRING CAN BE STORED. 

06 

CO 

16 


N VI D 

/LOAD THE D REGI STER HITH THE 

06 

CI 

OS 


oos 

/STRING TERMINATOR (CTRL-E) 

06 

C2 

CD 


CALL 

/INPUT THE STRING FROM THE KEYBOARD 

06 

C3 

C8 


STRIM 

/AND SAVE IT IN R/H MEMORY 

06 

C4 

04 


0 


06 

CS 

2A 

DAI ES. 

LHLD 

/NOH DELETE THE OLD STRING 

06 

C6 

34 


ADDCNT 

/GET ITS START1NG ADDRESS 
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«6 

C7 

18 


0 

/(FROM THE SEARCH COMMAN D) 

96 

ce 

EB 


XCKG 


16 

C9 

2A 


LHLD 

/GET ITS FINAL ADDRESS 

16 

CA 

36 


MNEVAL 

(FROM THE SEARCH COMMAND> 

06 

CB 

18 


0 


06 

cc 

7E 

DELSTR. 

MOVAM 

/GET A CHARACTER AFTER THE STRINO 

06 

CD 

12 


STAXD 

/MOVE IT DOWN ON TOP OF THE STRINO 

06 

CE 

FE 


CPI 

/HOVED THE TEXT BUFFER TEIWINATOR 

06 

cr 

9B 


BTEFW 

/YETT 

06 

DO 

CA 


JZ 

/YES# THEN INSERT THE NEW STRINO 

06 

DI 

D8 


INSSTR 


06 

D2 

06 


0 


06 

D3 

23 


INXH 

/NO# MOVE ANOTHER CHARACTER ON 

06 

D4 

13 


1NXD 

/TOP OF THE OLD STRINO 

06 

D5 

C3 


JMP 


06 

D6 

CC 


DELSTR 


06 

D7 

06 


0 


06 

De 

EB 

INSSTR. 

XCHG 

/GET THE TEXT ADDRESS INTO HAL 

06 

D9 

22 


SHLD 

/SAVE THE NEW HI ADDRESS 

06 

DA 

14 


HIADD 


06 

DB 

18 


0 


06 

DC 

2A 


LHLD 

/GET THE ADDRESS VX ERE THE 

06 

DD 

34 


ADDOIT 

/NEV STRINO IS TO BE IN SERTED 

06 

DE 

18 


0 


06 

DE 

22 


SHLD 

/SAVE IT IN MNITLN* FOR THE 

06 

El 

17 


1MITLN 

/•STOBUF" (STORE BUFFER) 

06 

Et 

18 


1 

/SUBRO UTINE 

06 

E2 

21 


LXIH 

/LOAD RESISTER PAIR H VITH THE 

06 

E3 

64 


EXSTR 

/STARTING ADDRESS OF THE NEV 

06 

E4 

18 


1 

/STRINO (WHERE IT IS IN MEMORY) 

06 

ES 

CD 


CALL 

/STORE THE STRINO IN THE 

06 

E6 

86 


STOBUF 

/TEXT BUFFER 

06 

E7 

03 


0 


06 

E8 

C3 


JMP 

/THEN GET ANOTHER COMMAND 

06 

E9 

70 


QUESTI 


06 

EA 

00 


0 





/"ADRIN 

* IS CALL ED AT THE BEG1NN1NG OF THE PROGRAM 




/VHEN THE INIT1AL AND FINAL R/V MEMORY ADDRESSES 




/MUST BE ENTERED. 

06 

EB 

CD 

ADRIN. 

CALL 

/GET EITHER AN O» H OR CR# 

06 

EC 

06 


IOECHO 

/FROM THE KEYBOARD# 

06 

ED 

18 


• 


06 

EE 

FE 


CPI 

/VANT THE SAME PREVIOUS ADDRESS? 

06 

e r 

OD 


CR 


06 

ro 

C8 


RZ 

/YES# THE ADDRESS IS ALREADY IN D4E 

06 

ri 

FE 


CPI 

/VANT TO ENTER A HEXADEC1MAL ADDRESS? 

06 

F2 

48 


•H* 


06 

F3 

CA 


JZ 

/YES. THEN GET TVO TVO-DIGIT 

06 

FA 

22 


TVOrfEX 

/HEXADECIMAL NUMBERS 

06 

F5 

07 


0 


06 

F6 

FE 


CPI 

/VANT TO ENTER AN OCTAL ADDRESS? 

06 

F7 

4F 


-o- 
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06 

F8 

C2 


JNZ 

/NO* THEN I (FIORE THE CHARACTER 

06 

F9 

EB 


ADR IN 

/AND OET ANOTHER ON E. 

06 

FA 

06 


0 


06 

FB 

CD 


C ALL 

/OH* TVO THREE- DIGIT OC TAL NIMBERS 

• 6 

re 

r f 


OCTIN 

/VILL BE IN TER ED. SET ONE THREE- 

06 

FD 

06 


0 

/ DI Gl T N UH BER INTO THE D REGI STER 

06 

FÉ 

53 


MOVDE 

/SAVE THIS HSBY IN THE D REGI STER 

06 

rr 

AF 

OCTIN. 

XRAA 

/SET THE A AND E REGI STERS TO ZERO 

07 

00 

5F 


HOVEA 


07 

01 

OE 


H VI C 

/LOAD THE C REGI STER VITH THREE* 

17 

02 

03 


003 

/BECAUSE THREE DIGITS VILL BE INPUT 

07 

03 

CD 

NXTOCT, 

CALL 

/GET AH ASCII VALUE FROH THE KEYBOARD 

07 

04 

06 


IOECHO 


07 

05 

18 


t 


07 

06 

FÉ 

SPCOIN. 

CPI 

/IS IT A VALID OCTAL DIGIT? 

07 

07 

30 


*0* 


07 

08 

DA 


JC 

/NO* ITS VALUE IS LESS THAN AH 

07 

09 

03 


NXTOCT 

/ASCII 0. 

07 

0A 

07 


• 


07 

OB 

FE 


CPI 

/ITS EQUAL TO OR GREATER THAN AH 

07 

OC 

38 


*8* 

/ASCII 0* IS IT LESS THAN AN ASCII 

07 

OD 

D2 


JNC 

/8? IF HOT* UMORE IT. 

07 

OE 

03 


NXTOCT 


07 

or 

07 


0 


07 

IO 

E6 


ANI 

/ITS A VALI D OCTAL NUMBER* SAVE THE 

07 

il 

07 


007 

/THREE LSBS. 

07 

12 

47 


HO VBA 

/SAVE THE VALUE IN B 

07 

13 

7B 


MOVAE 

/GET THE PREVIOUS VALUE 

07 

14 

07 


RLC 

/HULTIPLY IT BY ElGHT 

07 

15 

07 


RLC 


07 

16 

07 


RLC 


07 

17 

80 


ADDB 

/ADD THE VALUE JUST ENTERED. 

07 

18 

5F 


HOVEA 

/SAVE THE RESULT IN E 

07 

19 

OD 


DCRC 

/DECREMINT THE DIGIT COUNT 

07 

1A 

C2 


JNZ 

/IF THE DIGIT COUNT IS NON-ZERO* 

07 

1B 

03 


NXTOCT 

/GET ANOTHER VALUE FROH THE KYBD. 

07 

1C 

07 


0 


07 

1D 

3E 

spc* 

HVIA 

/PRINT A SPACE AFTER THE LAST DIGIT. 

07 

IE 

AO 


240 


07 

ir 

C3 


JHP 


07 

20 

or 


100 


07 

21 

18 


0 





/’TVOHEX* IS C ALL ED IF THE USER EH TER EX AH *H". THIS 




/HEANS 

THAT THE 

ADDRESS HUST BE ENTERED USING HEX. 

07 

22 

CD 

TVOHEX* 

CALL 

/GET THE FIRST TVO OF TOUR HEX- 

07 

23 

26 


HEXIN 

/ADECIMAL DIGITS. 

07 

24 

07 


0 


07 

25 

53 


HO VDE 

/SAVE THE HSBY IN THE D REGI STER. 

07 

26 

AF 

HEX1N* 

XRAA 

/SET THE A AND E REGI STERS TO ZERO 

07 

27 

5F 


HOVEA 


07 

28 

OE 


HVI C 

/LOAD THE C REGI STER VITH 002* 

07 

29 

02 


002 

/BECAUSE TVO DIGITS VILL BE ENTERED. 
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07 

2A 

CD 

NXTHEX, 

C ALL 

/GET A KEYBOARD CHARACTER. 

07 

2B 

06 


IOECHO 


07 

2C 

18 


0 


07 

2D 

FE 

SKPHIN, 

CPI 

/LESS THAN ASCII 07 

07 

2E 

30 


-o- 


07 

2F 

DA 


JC 

/YES» THEN IGNORE IT. 

07 

30 

2A 


NXTHEX 


07 

31 

07 


0 


07 

32 

FE 


CPI 

/LESS THAN ASCII 17 

07 

33 

3A 


*»* 


07 

34 

DA 


JC 

/YES. THEN IT MUST BE ASCII 0-9. 

07 

35 

43 


H EX 09 


07 

36 

07 


0 


07 

37 

FE 


CPI 

/LESS THAN ASCII A7 

07 

38 

41 


-A* 


07 

39 

DA 


JC 

/YES. THEN 1 (MORE IT. 

07 

3A 

2A 


NXTHEX 


07 

3B 

07 


0 


07 

3C 

FE 


CPI 

/EQUAL TO OR GREATER THAN ASCII G7 

07 

3D 

47 


-a- 


07 

3E 

D2 


JNC 

/YES. THEN I0JORE IT. 

07 

3F 

2A 


NXTHEX 


07 

40 

07 


0 


07 

41 

C6 


ADI 

/ITS A - F. ADD Oli TO IT. 

07 

42 

09 


Oli 


07 

43 

E6 

HEX09, 

ANI 

/SAVE THE FOUR LSBS 

07 

44 

0F 


017 


07 

45 

47 


MOVBA' 

/SAVE THE VALVE IN THE B REGI STER 

07 

46 

7 B 


MOVAE 

/GET THE PREVIOUS VALUE 

07 

47 

07 


RLC 

/MULTI PLY IT BY 16 

07 

48 

07 


RLC 


07 

49 

07 


RLC 


07 

4A 

07 


RLC 


07 

4B 

80 


ADDB 

/ADD THE VALUE JUST ENTERED 

07 

4C 

5F 


MOVEA 

/SAVE THE RESULT IN E. 

07 

4D 

OD 


DCRC 

/DECREMENT THE DIGIT COIMT 

07 

4E 

C2 


JNE 

/1F THE COVWT IS NON-ZERO. 

07 

4F 

2A 


NXTHEX 

/ANOTHER CHARACTER MUST BE ENTERED. 

07 

50 

07 


0 


07 

SI 

C9 


RET 


07 

52 

16 

BOOT. 

M VI D 


07 

53 

00 


000 

/1NITIAL1ZE THE CHECKSUH 

07 

54 

CD 

LDRIN» 

CALL 

/READ A CHARACTER FROM THE TAPE 

07 

55 

OC 


IOR 


07 

56 

18 


0 


07 

57 

FE 


CPI 

/1S IT THE LEADER <200*S> 7 

07 

58 

80 


200 


07 

59 

CA 


JZ 

/YES. KEEP READING UNTIL VE 

07 

5A 

54 


LDRIN 

/PASS ALL THE LEADER 

07 

5B 

07 


0 


07 

se 

FE 

CHXrHM# 

CPI 

/NO. NOT LEADER IS IT THE ADDRESS FLAO 7 

07 

5D 

40 


100 


07 

SE 

C2 


JNZ 

/NO. SEE IT IT VAS THE CHECXSUH FLAG (300) 
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07 5F 6F 
07 6 0 0 7 

61 CD 

62 92 

63 07 

64 67 

65 CD 

66 92 

67 07 
66 6F 

69 CD 
6A OC 
6B 18 
6C C3 
6D 5C 
6E 07 
6F FE 

70 CO 

71 C2 

72 84 

73 07 

74 CD 

75 9A 

76 07 

77 BA 

78 CA 

79 70 
7A 00 
7B 21 
7C 69 
7D 12 
7E CD 
7F 7A 

80 OS 

81 C3 

82 70 

83 00 


NOTA 

0 

C ALL 
ADDCHX 
0 

HO WA 
C ALL 
ADDCKK 

0 

HOVLA 

ENXTIN# C ALL 
IOR 

0 

JMP 

CHxrwi 

0 

NOTA# CPI 
300 
JNZ 
NOTSUH 
0 

C ALL 
BBYTE 

0 

CMPD 

JZ 

QUESTI 

0 

LXIH 

BDCHKS 

0 

CALL 

TOUT 

0 

JMP 

QUESTI 

0 


/YES# IT WAS THE ADDRESS FLAG (A 100) 
/GET THE NEXT 2 FRAMES# VHICH ARE THE 
/HIGH ADDRESS 

/THEN GET THE 2 FRAMES VHICH ARE 
/THE LO ADDRESS 


/NOV GET ANOTHER FRANE 
/AND PROCESS IT 


/WAS NOT A 100 POR Mi ADDRESS 
/IS IT THE CKECXSUN FLAG (A 30 0) 7 

/NO# THEN TREAT IT AS DATA 

/IT WAS THE FLAG# GET THE 
/2 FOLLOWING FRAMES# BUT DON'T 
/ADD THE CHECK SIN TO THEM. 

/COMPARE THE CALCULATED VERSUS ACTUAL 
/1F THEY ARE EQUAL# JUNP BACK TO THE 
/COMMAMD MODE 

/BAD CHECK SUN# SO SAY SO ON THE 
/PRINTER 

/PRINT THE MESSAGE 


/TUBI DI TER THE COMMAND MODE 


84 CD 
8$ 8C 

86 07 

87 77 

88 23 

89 C3 
SA 69 
8B 07 
8C CD 
8D 9D 
SE 07 
8F C3 

90 95 

91 07 

92 CD 

93 9A 


NOTSUH# CALL 
ADDI 
0 

NOVMA 

INXH 

JMP 

BIXTIN 

0 

ADDI# CALL 

BBYTE1 

0 

JMP 


/TREAT THE CURRFNT FRANE AND 
/NEXT FRANE AS DATA 
/THEN SAVE IT IN MEMORY 
/INCREMENT THE STORAGE POINTER 
/AND GET ANOTHER FRANE 


/GET 2 FRAMES# I BYTE 


ADDCHX» 3 

0 

ADDCHX# CALL 
BBYTE 
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•7 

94 

07 


0 


07 

95 

F5 


PUSHPSV 

/SAVE *A* 

07 

96 

82 


ADDO 

/ADD THE CHECKSt» 

07 

97 

57 


HOVDA 

/AND SAVE IT BACK IH *D“ 

07 

98 

ri 


POPPSW 

/GET THE DATA VORD BACK 

07 

99 

C9 


RET 


07 

9A 

CD 

BBYTL# 

CALL 

/READ THE 2 HSB'S FROH THE TAPE 

07 

9B 

OC 


IOR 


07 

9C 

18 


0 


07 

9D 

OF 

BBYTEU 

RRC 

/ROTATE THE B1TS TO THE HSB'S 

07 

9 E 

0F 


RRC 


07 

9 F 

4F 


MOVCA 

/SAVE THE TEHPORARY VALUE IN *C* 

07 

A0 

CD 


CALL 


87 

A! 

OC 


IOR 

/THEN READ THE 6 LSB'S 

07 

A2 

18 


0 


07 

A3 

81 


ADDC 

/ADD THE HSB'S 

07 

A4 

CO 


RET 

/AND RETUW VITH THE VALUE IN “A* 




/THI S IS THE I/O TABE E THAT TEA tfRITES I!«TO R/V 




/MEMORY. 

. TEA THEN ACCESSES THE I/O SUBROUTINES 




/BY CALLING THESE JUMP INSTRUCTIONS. 

07 

A5 

C3 

1OTAB* 

JHP 

/GET THE KEYBOARD'S FLAG 

07 

A6 

51 


1MCHK 


07 

A7 

06 


0 


07 

A8 

C3 


JHP 

/GET A CHARACTER BUT DO NOT 

07 

A9 

6A 


TTYI 

/PRINT IT 

07 

AA 

06 


0 


07 

AB 

C3 


JHP 

/GET A CHARACTER MD PRINT IT 

07 

AC 

76 


TTYIM 


07 

AD 

06 


0 


07 

AE 

C3 


JHP 

/PUNCH THE CONTENT OF THE A REG. 

07 

AF 

70 


TTYOUT 


07 

BQ 

06 


0 


07 

B1 

C3 


JHP 

/READ A CHARACTER INTO THE A REG' 

07 

B2 

56 


IORDR 


07 

B3 

06 


0 


07 

B4 

C3 


JHP 

/PRINT THE CONTENT OF THE A REG. 

07 

BS 

70 


TTYOUT 


07 

B6 

06 


0 
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/TH1S IS THE ASSEMBLEA PORTI OH OF THE 
/TYCHON EDITOA-ASSEMBLEA* 


IT 

B7 

CD 

AS5EMB. 

CALL 

/PRIMT A CR AND LF. 

(7 

B8 

39 


CRLF 


(7 

B9 

02 


0 


(7 

8A 

3A 


LDA 

/QET THE HEX/OCTAL SVITCH 

(7 

BB 

3E 


HORO 


(7 

BC 

18 


0 


(7 

BD 

F E 


CPI 

/IS IT IN THE HEX MODE? 

(7 

BE 

48 


*H* 


17 

BF 

C2 


JNZ 

/NO. IT IS AN O FOR OCTAL 

(7 

CI 

C8 


POS 

/SO PRINT “OCTAL“ 

(7 

CI 

07 


0 


(7 

C2 

21 


LXIK 

/IT IS H. LOAD HAL VITH THE MEM- 

17 

C3 

CE 


HEXSRC 

/ORY ADDRESS FOR THE “HEXADECIMAL* 

07 

C4 

11 


0 

/HESSAQE 

(7 

C5 

C3 


JMP 

/NOV PRINT IT 

(7 

C6 

CB 


HEXP 


07 

C7 

07 


0 


07 

C8 

21 

POS. 

LXtH 

/LOAD K4L VITH THE ADDRESS FOR THE 

07 

C9 

DA 


OCTSRC 

/“OCTAL' HESSAQE. 

07 

CA 

11 


1 


07 

CB 

CD 

HEXP# 

CALL 

/PRINT THE MESSAGE POINTED TO 

07 

CC 

7A 


TOUT 

/BY REGI STER PA1R H 

07 

CD 

05 


0 


(7 

CE 

21 

ASSMB1. 

LX1H 

/NOV PRINT “M OR T? “ 

07 

CF 

4F 


TAS 


07 

DO 

11 


0 


07 

DI 

CD 


CALL 


07 

D2 

7A 


TOUT 


07 

D3 

05 


0 


07 

DA 

CD 


CALL 

/INPUT A TELETYPE CHARACTER 

07 

D5 

06 


ÌOECHO 


07 

D6 

18 


« 


07 

D7 

32 


STA 

/SAVE THE CHARACTER IN “MORT“ 

07 

DB 

3D 


mort 

/NO HATTER VHAT VAS TYPED IN. 

07 

D9 

18 


0 


07 

DA 

FE 


CPI 

/SEE IF IT VAS *M* FOR MEMORY 

07 

DB 

4D 


“M* 


07 

DC 

CA 


JZ 

/YES. IT VAS A N “M“. CONTINUE 

07 

DD 

EC 


MOK 

/VITH THE ASSEMBLY PROCESS 

07 

DE 

07 


0 


07 

DF 

FE 


CPI 

/SEE IF IT VAS A *T“ FOR TAPE 

07 

E0 

54 


*T* 


07 

E1 

CA 


JZ 

/YES. IT VAS A *T*. CONTINUE 

07 

E2 

EC 


HOK 

/VITH THE ASSEMBLY PROCESS 

07 

E3 

07 


0 


07 

ZA 

FE 


CPI 

/SEE IF IT VAS A CTRL-C 

07 

ES 

03 


CTRLC 

/IF IT VAS. GO TO THE "CONDEC* AT 

07 

£6 

CA 


JZ 

/THE BEGINNING OF THE PROGRAM 

07 

E7 

70 


QUESTI 

/AND SEE VHAT THE USER'S UP TO. 

07 

E8 

10 


• 


07 

E9 

C3 


JMP 

/IF NOT T.M OR CNTRL-C. ASK “M OR T* 
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07 

EA 

CE 


ASSMB1 

/AQAIN 

07 

EB 

07 


• 


07 

EC 

21 

NOK# 

LXIH 

/LOAD REGI STER PAIR H V1TH THE STARTING 

07 

ED 

5B 


AUTO 

/ADDRESS Or THE HESSAGE "AUTO-LOAD 7* 

07 

EE 

11 


0 


07 

E T 

CD 


C ALL 

/PRINT THE HESSAGE 

07 

ro 

7A 


TOUT 


07 

ri 

OS 


0 


07 

re 

CD 


C ALL 

/GET THE USER'S RESPONSE 

07 

r 3 

06 


IOECHO 

/TO THE QUESTION. 

07 

ro 

18 


t 


07 

rs 

32 


STA 

/SAVE THE RESPONSE POR LATER. 

07 

76 

41 


PORL 


07 

F7 

18 


0 


07 

rs 

2A 


LHLD 

/LOAD HAL VITH THE STARTING ADDRESS 

07 

ro 

22 


TXTBUP 

/OE THE TEXT BUEPER 

07 

rA 

18 


0 


07 

rs 

3A 


LDA 

/ASSEMBLINO TROH MEMORY OR TAPE7 

07 

re 

3D 


MORT 


07 

rD 

18 


0 


07 

re 

rE 


CPI 

/RESPONSE EQUAL TO ASCII T7 

07 

rr 

54 


"T" 


08 

00 

C2 


JNZ 

/MOT PROM TAPE. SO THE ENTI RE PROGRAM 

08 

01 

07 


MOTAP 

/MUST BE STORED IN MEMORY 

08 

02 

08 


0 


08 

03 

24 


IN RH 

/IT PRON TAPE. RESERVE 256 R*V LOCATIONS 

08 

04 

C3 


JMP 

/POR "ONE* LINE Or TEXT 

08 

05 

OA 


NOTAPI 


08 

06 

08 


0 


08 

07 

2A 

NOTAP# 

LHLD 

/GET THE H1GHEST ADDRESS USED BY 

OS 

08 

14 


KIADD 

/THE TEXT BUrPER. 

08 

09 

18 


0 


08 

0A 

23 

NOTAPl# 

INXH 

/INCREMENT THE ADDRESS BY TVO 

08 

0B 

23 


1NXH 


08 

OC 

22 


SKLD 

/THIS IS VHERE THE SYMBOLIC ADDRESS 

08 

OD 

39 


SYMADD 

/TABLE VILL BE STORED 

08 

OE 

18 


0 


08 

or 

22 


SHLD 

/SAVE THIS ADDRESS IN SYMADP (THE ADDRESS 

OS 

IO 

3B 


SYMADP 

/Or THE END Or THE TABLE) ALSO. 

08 

li 

18 


0 


08 

12 

36 


HVIH 

/SAVE A TEmiNATOR AT THE BEGINNING 

08 

13 

9B 


BTERH 

/Or THE SYMBOLIC ADDRESS TABLE. 

08 

14 

2A 


LHLD 

/GET THE LAST ADDRESS Or R-V MEMORY 

08 

15 

24 


ENDRAM 


08 

16 

18 


0 


08 

17 

22 


SHLD 

/SAVE THE ADDRESS AS THE BEGINNING 

08 

18 

12 


BYT AB 

/OP THE DEFINED BYTE TABLE 

08 

19 

18 


0 


18 

1A 

36 


HVIH 

/ALSO SAVE A 233 TERMINATOR 

08 

IB 

9B 


BTERH 

/AT THE BEGINNING OF THE DB TABLE. 

08 

IC 

3E 

PASSI# 

HV1A 

/SAVE A 377 IN "PASS* TO INDICATE 

08 

ID 

rr 


377 

/THAT THE ASSEMBLER IS MAKING THE 

08 

IE 

32 


STA 

/FIRST PASS THROUGH THE PROGRAM 

08 

ir 

42 


PASS 

/BEING ASSEMBLEO. 
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et 

10 


0 


21 

CD 


CALL 

/SET A N UH BER OF MEMORY ADDRESS 

22 

35 


CLRREG 

/ PO IH TERS AND COUNTERS TO ZERO. 

23 

11 


0 


24 

CD 


CALI. 

/IF ASSEMBLINO FROH TAPE. ASM "R 7* 

25 

4F 


READY 

/AND READ A SINGLE LINE OF TEXT. 

26 

• C 


0 

/IF FROH MEMORY. SIMPLY RETUJW. 

27 

CD 


CAU. 


28 

AB 


LOOK 

/SET UP THE SYMBOL!C ADDRESS TABLE 

2» 

OA 


0 


2A 

CD 


CALL 

/THEN PR1NT THE NUMBER OF ERRORS 

2B 

9A 


ERRO UT 

/THAT OCCURRED DURINO THE FIRST 

2C 

IF 


0 

/PASS 

2D 

CD 


CALL 

/PRINT A CARRI AG E RETUJM AND LINE 

2E 

39 


CRLF 

/FEED AFTER IT. 

2F 

02 


0 


31 

CD 


CALL 

/THEN CLEAR OUT SOME POINTERS AND 

31 

35 


CLRREQ 

/COIMTERS SO THAT THE SECOND PASS 

32 

IO 


0 

/CAN BE PEREQUI ED. 

33 

CD 

PASS2. 

CALL 

/DURINO PASS 2. VE PIMCH A TAPE. 

34 

4F 


READY 

/SEE IF THE USER'S READY. 

35 

OC 


0 


36 

3E 


M VI A 

/ P- PLN CH 

37 

50 


*P* 


36 

32 


STA 

/SAVE A *P“ IN PASS. TO INDICATE THAT 

39 

42 


PASS 

/THAT THE SECOND PASS 15 BEINO 

3A 

16 


1 

/PERFOIMED. 

3B 

CD 


CALL 

/PUNCH 10* OF PAPER TAPE LEADER 

3C 

55 


LDR 


3D 

05 


0 


3E 

CD 

MOHMN E# 

CALL 

/NOV AS SEMEL E THE ENTI RE PROGRAM 

3F 

6D 


MNEOK 

/TH1S IS PASS # 2 

40 

00 


1 


41 

3E 


M VI A 

/TAPE HAS BE» PUNCH ED. PIMCH THE 

42 

CO 


300 

/CHECKSUM ET.AG 

43 

CD 


CALL 

/AS 8 BITS PARALE EL OH 

44 

09 


IOP 

/THE PAPER TAPE). 

45 

18 


0 


46 

3A 


LDA 

/NON OET THE CHECK SUN 

47 

3F 


CKKSUM 


40 

18 


0 


49 

4F 


HOVCA 


4A 

CD 


CALL 

/AND PUNCH IT OUT 

4B 

ED 


BYTE2 

/ C BYTE2 AVO 1 DS THE ADD CHECK SUN SOFTWARE) 

4C 

OF 


• 


4D 

CD 


CALL 

/PUNCH ANOTHER II* OF LEADER NON 

4E 

55 


LDR 

/THAT THE » TI RE PROGRAM HAS BE» 

4F 

05 


0 

/ASSEMBLEO. 

50 

CD 


CALL 

/TYPE OUT THE # OF ERRORS 

51 

9A 


ERRO UT 

/THAT OCCURRED VH1LE VE 

52 

OF 


0 

/VHERE PIMCH IN G OUT THE TAPE. 

53 

CD 

PASS3. 

CALL 

/READY FOR THE THIRD PASS? 

54 

4F 


READY 


55 

OC 


0 
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96 

56 

CD 

CALI 

/YES» PRINT A CR MIO LF. 

98 

5T 

39 

CRLF 


*8 

58 

92 

9 


M 

59 

3E 

M VI A 


*8 

SA 

4C 

•L* 

/L-LISTING OF THE ASSEMBLEO PROQRAH 

M 

5B 

32 

STA 


18 

se 

42 

PASS 


•8 

5D 

18 

9 


K 

SE 

CD 

DO IT. CALO. 

/CLEAR OUT SOME POINTERS Mi D COUNTERS 

98 

sr 

35 

CLRREG 


98 

69 

19 

9 


98 

61 

CD 

CAU. 

/PRINT THE ‘HEADING IN PDFMATIOM “ Mi D 

98 

62 

3E 

PA8E2 

/THE PAGE NEH BER *91-991.* 

98 

63 

9F 

9 


96 

64 

CD 

CALL 

/THEN ASSEMELE THE PROGRAM AGAIN. 

98 

65 

6D 

IMEOK 


98 

66 

98 

9 


98 

67 

CD 

SYML. C ALL 

/TYPE OUT THE SYHBOLIC 

•8 

68 

EB 

SYMOUT 

/ADDRESS TABLE . 

98 

69 

9D 

9 


98 

6A 

C3 

JMP 

/Mi D GET AH OTHER COMMA* D. 

98 

6B 

79 

QUESTI 


98 

6C 

99 

9 





/FINO THE 1*1 EMONI C. CHECK TO SEE IF 1TS VALI D. 




/DETEJMINE THE 

* OF BYTES AND CHECK THE POR- 




/HAT OF THE OTHER BYTES. IF APPLI CABLE. 

98 

6D 

2A 

NNEOK. LKLD 

/H9L POINT TO THE BEGINNING 

OS 

6E 

22 

TXTBUF 

/OF THE TEXT BUFFER. 

98 

6 r 

18 

9 


98 

78 

22 

SHLD 

/INIT1AL1ZE TFCLIN TO THE SANE ADDRESS 

98 

71 

2E 

TFCLIH 


98 

72 

18 

0 


98 

73 

AF 

NH. XRAA 

/SET A AND B TO ZERO. 

98 

74 

47 

HOVBA 


98 

75 

32 

STA 

/SET THE NMEMONIC VALUE TO 009. BEFORE 

98 

76 

36 

KNEVAL 

/THE NEXT HN EMONIC IS INTERPRETED. 

98 

77 

18 

9 


98 

78 

CD 

C ALL 

/VE V1LL EXIT FINCH UPON FINDING 

98 

79 

84 

FINCH 

/THE MO OF THE TEXT BUFFER OR 

08 

7A 

08 

0 

/UPON FINDING A NNEMONIC. 

98 

7B 

F E 

CPI 

/IF A LINE CONTAINING ONLY A CONMENT 

98 

7C 

9B 

BTERM 

/IS FOIND. VE VILL TYPE IT OUT IF AP¬ 

18 

7D 

C8 

RZ 

PROPRIATE. AND GO ON TO THE NEXT LINE. 

18 

7E 

FE 

CPI 

/VAS THE DOLLAR SION TEMINATOR AT THE 

98 

7 F 

24 

944 

/END OF THE TEXT BUFFER POUNDT 

98 

89 

C8 

RZ 

/YES. THEN RETURN 

98 

81 

C3 

JMP 


98 

82 

F0 

FMNOK 

/VE FOIND A HN EMONI C. CHECK IT OUT 1 

98 

83 

98 

0 





/‘FINCH* IS USED TO FINO A HN1MONIC IN A LINE OF TEXT 
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84 

3A 

FINCH# 

LDA 

/VHERE IS THE SOURCE COH1NG FR0N7 

85 

30 


MORT 


86 

18 


0 


87 

ri 


CPI 

/IS IT CON INO FROM TAPE7 

88 

54 


"T* 


89 

C2 


JNZ 

/NO* ITS STOREO IN MEMORY. 

SA 

92 


FT 


8B 

08 


0 


8C 

2A 


LHLD 

/1TS CONINO FROM TAPE* SO ONLY ONE LINE 

8D 

22 


TXTBUF 

/VILL BE STOREO IN MEMORY AT ONE TIME* 

8E 

18 


0 

/WD ALVAYS STARTIN0 AT "TXTBUF* 

8 r 

C3 


JMP 


90 

95 


NXTCHR- 

1 /NON PROCESS THE LINE OF TEXT 

91 

08 


0 




/JUHP TO *FT* ir THE SOURCE IS IH MEMORY* 

92 

2A 

FT. 

LHLD 

/HAL POINT TO THE FIRST CHARACTER IN 

93 

2E 


TFCLIN 

/A LINE (TEXT* FIRST CHARACTER (IN A) 

94 

18 


1 

/LINE). 

95 

2B 


DCXH 

/BACK THE AODRESS UP BY ONE 

96 

23 

NXTCHR* 

INXK 

/OET A TEXT CHARACTER 

97 

7E 

NXCHR1* 

MOVAM 


98 

FE 


CPI 


99 

24 


144 

/DOLLAR S10N7* (A TEXT BUFFER 

9A 

C8 


RZ 

/TERMINATOR). YES. START ANOTHER PASS. 

9B 

FE 


CPI 

/233 TEIMINATOR (AT THE END OF THE 

9C 

9B 


BTERM 

/TEXT BUFFER)?* YES* START ANOTMER PASS. 

90 

C8 


RZ 


9E 

FE 


CPI 

/FOtJND AN ASCII SPACE7 

9F 

21 


040 


Al 

CA 


JZ 

/YES. THEN 1 ONORE IT AND OET 

Al 

96 


NXTCHR 

/ANOTHER CHARACTER FROM MEMORY. 

A2 

«8 


• 


A3 

FE 


CPI 


A4 

2A 


052 

/• FOR AN AODRESS 7 («-PSEUDO-OR) 

A5 

C2 


JHZ 

/(•IS SIMILAR TO "ORO*) NOT AN • 

A6 

AE 


NOSTAR 


A7 

18 


• 


A8 

CO 


CALL 

/ROUND A •* SO PROCESS THE AODRESS 

A9 

OC 


ADDOX 

/AND SAVE THE 16-BIT RESULT IN 

HA 

IC 


0 

/'AODQIT. * 

AB 

C3 


JMP 

/THEN PROCESS THE N EXT LINE OF 

AC 

97 


NXCHR1 

/TEXT. 

AD 

18 


0 
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98 

AE 

FE 

NO STAR» 

CPI 

/HOT «N •» IS IT A TAB7 

(8 

AF 

0A 


012 

/ TAB- Oli ON TAPE» 0-10 IN MEMORY 

SS 

B0 

DA 


JC 

/TAB ON TAPE OR IN MEMORY 

08 

B 1 

96 


NXTCHR 


(8 

B2 

08 


0 

/SK1P THE TABS 

08 

B3 

FE 


CPI 

/IS IT A SLASH FOR A COMM IN T7 

08 

BA 

2F 


057 


08 

BS 

CA 


JZ 

/YES» THEN UMORE THE REMAINDER 

08 

B6 

DS 


ENCLN 

/or THE LINE OF TEXT. 

08 

B7 

08 


• 


08 

B8 

FE 

NOSLSH» 

CPI 

/NOT A SLASH» IS IT A COMMA AT THE END 

06 

B9 

2C 


0 54 

/OF A SYMBOLIC ADDRESS7 

08 

BA 

C2 


JNZ 

/NO» IS IT A CARRI AG E RETUM7 

08 

BB 

C2 


NOCOMA 


08 

BC 

08 


0 


08 

BD 

06 


M VI B 

/IT IS A COMMA» SO SET B-000. 

08 

BE 

00 


000 


08 

BF 

C3 


JMP 

/THEN EX AM IN E THE NEXT CHARACTER IN 

08 

CO 

96 


NXTCHR 

/THE LINE OF TEXT. 

08 

CI 

08 


0 


08 

C2 

FE 

NOCOMA. 

CPI 

/NOT A COMMA» IS IT A CARRIAGE 

08 

C3 

OD 


CR 

/RETUM 7 

08 

C4 

CA 


JZ 

/YES» THEN ITS THE END OF THE LINE. 

08 

CS 

DS 


ENDLN 


08 

C6 

08 


0 


08 

C7 

78 


MOVAB 

/MUST BE A LETTER IN A SYBOLIC ADDRESS 

08 

C8 

FE 


CPI 

/OR A MNEMONIO TO GET MERE 

08 

C9 

FF 


377 

/ DO ES B" 3777 

08 

CA 

CA 


JZ 

/YES. THEN LOOK AT THE NEXT CHARACTER. 

08 

CB 

96 


NXTCHR 


08 

CC 

08 


0 


08 

CO 

22 


SHED 

/NO» THEN VE HAVE FOIMD THE FIRST 

08 

CE 

30 


TFMLIN 

/CHARACTER IN A MN EMONIO» SAVE ITS 

08 

CF 

18 


0 

/ADDRESS 

08 

DO 

06 


MVIB 

/SET THE B REGI STER TO 377 

08 

DI 

FF 


377 


08 

D2 

C3 


JMP 

/AND EX AM INE THE REST OF THE CHARACTERS 

08 

03 

96 


NXTCHR 

/IN THE LINE OF TEXT. 

08 

04 

08 


0 


08 

DS 

78 

ENDLN» 

MOVAB 1 

/1F NO MN EMONIO» B-00 0 

08 

D6 

FE 


CPI 


08 

07 

00 


000 


08 

08 

CO 


mz 

/MUST HAVE FOIMD A MN EMONIO. SO RETUM 

08 

D9 

CD 


CALL 

/ITS A CONMENT. SHOULD IT BE TYPED 

08 

DA 

E4 


SPECO 1 

/OUT? (ONLY DURING PASS 3). 

08 

DB 

08 


0 


08 

OC 

06 

NO CO UT» 

MVIB 

/CLEAR THE SENSE REGI STER 

08 

DO 

00 


000 


08 

DE 

CD 


CALL 

/AND FIN D THE NEXT LINE OF TEXT (IF 

08 

DF 

A3 


FIN DQR 

/ASSEMBLINO FROM TAPE» THE 8 080 

08 

E0 

OD 


0 

/READS ANOTHER LINE). 

08 

E1 

C3 


JMP 

/THEN PROCESS THIS LINE OF TEXT 

08 

E2 

97 


NXTCHR* 1 

08 

E3 

08 


0 
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SPECL la LDA 
PASS 

0 

CPI 

’L" 

RNZ 

CALL 

SPCIT 

0 

JMP 

SPECL 

0 


/FIND OUT WHAT THE PASS # IS. 


/ITS PASS 3 IF "PASS" » "L* 

/MOT PASS 3* DON *T TYPE AMYTH1NG 
/PASS 3» SKIP OVER THE ADDRESS Mi D 
/MMEMONIO VALUE COLIMI S 

/NOV TYPE THE COMMENT. (THIS IS AL SO 
/USED VHEN VE HAVE A PSEUDO-OP 
/SUCH AS DB OR DV). 


/VE FOIMD A NN EMONI C IN THE TEXT BUFFER* SO MAKE SURE 
/THAT IT IS A VAL ID MN EMON I C* BY CHEOCING IT AGAIMST 
/THE ENTRI ES IN THE "PERMANENT SYMBOL TABLE. * 


FMNOK» 


M VI B 
002 
MVIC 
075 
LKLD 
TFNLIN 
0 

XCHG 

LXIH 

MNELST 

0 

CALL 

SEARCH 

• 

MOVBA 

LDA 

MNEVAL 

0 

CPI 

100 

JZ 

MOVE 

0 

CPI 

004 

JZ 

MOVI 

o 

CPI 

oos 

JZ 

MOVI 

I 

CPI 

006 

JZ 


/B-t OF BYTES TO SKIP IN THE TABLE. 

/C-NODE TERHINATION CHARACTER 

/LOAD HAL VITH THE ADDRESS OF THE 
/FIRST CHARACTER IN THE MN EMONIO 
/STORED IN THE TEXT BUFFER. 


/SET H4L TO THE MN EMONIO TABLE. 

/SEE IF THE MN EMONIO IS IN THE TABLE 


/SAVE THE 233 IF THE END OF THE TABLE 


/THE FOLLOVING VILL NOT BE ‘POUND* 
/IN THE TABLE» HO V * S* M VI * S. IN RX/DCRX 
/IMMEDIATE HATH INSTRUCTIONS AND 
/ALL REGULAR HATH INSTRUCTIONS. 

/100 NEANS ITS A MOV-TYPE INSTRU. 


/004 OR 0X4 IS AN INCREMENT INSTRU. 
/NOV DETEMINE THE REGI STER INVOLVED 


/ 0 0 5 OR 0X5 IS A. DECREMENT IMSTRUCTION 
/NOV DETEIM1NE THE REGI STER INVOLVED 


/006 OR 0X6 IS A MOVE IMMEDIATE 
/DETERN1NE THE REGI STER INVOLVED 


184 






TYCHON EDI TOR-ASSEMBLER V-3 


PAGE 12-003 


14 

65 


MOVI 


15 

0A 


0 


16 

FE 


CPI 


17 

80 


200 

/ir THE VALUE IS BETVEEN 200 AND 271 

18 

DA 


JC 

/THEN ITS A MATH INSTRUCTION. 

19 

20 


NOPART 


IA 

09 


0 


1B 

FE 


CPI 


1C 

B9 


271 


1D 

DA 


JC 

/OK* ITS EQUAL TO OR GREATER THAN 200 

1E 

85 


MATH 

/AND LESS THAN 271. SO ITS A MATH OR 

ir 

0A 


0 

/LOGICAL INSTRUCTION. OET THE REGI STER. 

20 

78 

NOPART. 

MOVAB 

/VAS THERE A TABLE TERMINATOR 7 

ei 

FE 


CPI 


22 

9B 


BTERM 


23 

C2 


JNZ 

/NO. SO THE NN EMONI C IS STORED 

24 

3F 


FOIND 

/IN ITS ENTIRETY, IN THE TABLE 

25 

09 


0 


26 

CD 

NOMATI!* 

CALL 

/IT IT VASN'T IN THE MNEMONIO PER- 

27 

84 


FIN DM 

/MANENT SYMBOL TABLE. VE GET HERE. 

28 

08 


0 


29 

2A 


LHLD 

/GET THE ADDRESS OF THE FIRST CHARACTER 

2A 

30 


TFMLIN 

/or THE ‘(«EMONI C“ UT MAY BE A SYM- 

2B 

18 


0 

/BOLIC ADDRESS). 

2C 

EB 


XCHG 

/SEE IF ITS A SYMBOL1C ADDRESS 

2D 

2A 


LHLD 

/GET THE STARTING ADDRESS OF THE 

2E 

39 


SYMADD 

/SYMBOLIC ADDRESS TABLE TKAT THE AS- 

2F 

18 


0 

/SEMBLER CREATED DURING PASS 1. 

30 

OE 


MVIC 

/LOAD C VITH THE STRINO TERMINATOR 

31 

3D 


075 


32 

06 


MVIB 

/LOAD B VITH THE NUNBER OF BYTES TO SKIP 

33 

03 


003 


34 

CD 


CALL 

/SEARCH THE SYMBOLIC ADDRESS TABLE FOR 

35 

6E 


SEARCH 

/A MATCH1NG ENTRY. 

36 

oa 


1 


37 

FE 


CPI 


38 

9B 


BTEW 

/DID VE FIND THE END OF 

39 

C2 


JNZ 

/SYMBOLIC ADDRESS TABLE 7. NO 

3A 

18 


NOSTRA 

/SO VE MUST HAVE FOIND A 

3B 

OA 


0 

/SYMBOLIC ADDRESS 

3C 

C3 


JMP 

/NOT A SYMBOLIC ADDRESS. SEE IF 

3D 

D5 


OB 

/ITS A NUMBER OR A DEFIN ED BYTE 

3E 

09 


0 


3F 

3A 

FOIND. 

LDA 

/VE FOIND THE ‘MNEMMON1C* IN THE TABLE 

40 

36 


MNEVAL 

/FIRST SEE IF IS A ‘PSEUDO-OP*. SUCH 

41 

18 


0 

/AS ‘DB* OR ‘DV.* 

42 

FE 


CPI 


43 

08 


010 

/DB OCTAL CODE 

44 

CA 


JZ . 


45 

94 


DB 

/YES. USER IS DEFIN INO A BYTE 

46 

IO 


0 


47 

FE 


CPI 


48 

IO 


020 

/DV OCTAL CODE 
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49 

CA 

JZ 


4A 

7 F 

DV 

/YES* USER 15 DEFIN INO A WORD 

4B 

10 

0 


4C 

06 

MV1B 


4D 

rr 

377 


4E 

co 

CALL 

/IT VASN'T A PSEUDO-OP. ITS A NNDIONIC. 

4r 

A0 

CRIO 

/DO «E PUNCH THE VALUE ON TAPE 

50 

OD 

0 

/OR TYPE OUT THE LINE OF CODE 7 

51 

3A 

LDA 


52 

36 

KNEVAL 

/FINO OUT HOW MANY 8YTES THE IN STRUC- 

53 

18 

0 

/TION IS AND HOU MANY ADD1TIONAL BYTES 

54 

47 

HOVBA 

/ARE REQUI RED BY THE INSTRUCTION 

55 

FE 

CP1 


56 

C3 

303 

/ IN CON DITI ON AL JUMP 

57 

CA 

JZ 


sa 

BC 

SYMOCT 

/THE REMAINING BYTES CAN BE A SYMBOL 1C 

59 

09 

0 

/ADDRESS OR TVO EIGHT-BIT NUMBERS. 

SA 

FE 

CPI 


5B 

CD 

315 

/ UN CONDÌ TION AL CALL 

se 

CA 

JZ 


5D 

BC 

SYH0C7 

/SANE AS A JUMP INSTRUCTION (ABOVE) 

SE 

09 

0 


5F 

FE 

CPI 


60 

D3 

323 

/OUT INSTRUCTION 

61 

CA 

JZ 


62 

02 

NMONLY 

/A NUMBER OR DB C/M SPECI FY THE 

63 

09 

0 

/OUTPUT PORT. 

64 

FE 

CPI 


65 

DB 

333 

/IN INSTRUCTION 

66 

CA 

JZ 


67 

D2 

NMONLY 

/SAME AS THE OUTPUT INSTRUCTION (ABOVE)* 

65 

09 

0 


69 

E6 

«NI 


6A 

C7 

307 


6B 

FE 

CPI 


6C 

01 

001 

/LXIB* D* H OR SP 7 

6D 

CA 

JZ 

/MAYBE# PER FORM ANOTHER HASKING 

6E 

AD 

LXI 

/OPERATION* 

6F 

09 

0 


70 

FE 

CPI 


7 1 

02 

002 

/DOUBLÉ PRECI SION LOAD * STORES 

72 

CA 

JZ 

/MAYBE* PER FORM ANOTHER MASKING 

73 

B6 

DPLS 

/OPERATION. 

74 

09 

0 


75 

FE 

CPI 


76 

C2 

302 

/CON DITIONAL JUMPS 

77 

CA 

JZ 


78 

BC 

SYMOCT 

/SYMBOL 1 C ADDRESS OR NUMBERS 

79 

09 

0 


7A 

FE 

CPI 


7B 

C4 

304 

/CONDITIONAL CALLS 

7 C 

CA 

JZ 


7D 

BC 

SYMOCT 

/SYMBOLIC ADDRESS OR NUMBERS. 

7 E 

09 

0 
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7F 

FE 

CPI 


so 

06 

• 06 

/MOVE IMMEDIATE 7 

81 

CA 

JZ 


82 

8F 

OCTO 

/HIMBER# QUOTED CHARACTER OR DB. 

83 

09 

0 


84 

FE 

CPI 


85 

C6 

306 

/IMMEDIATE HATM 

86 

CA 

JZ 


87 

8F 

OCTO 

/NUMBER. QUOTED CHARACTRE OR DB. 

88 

09 

0 


89 

2A 

GEN ENT, LHLD 

/1TS SIMPLY A SINGLE BYTE INSTRUCTION. 

8A 

2E 

TFCLIN 

/SO GET THE ADDRESS VHERE THE NEXT 

8B 

18 

0 

/LINE OF TEXT IS STORED 

8C 

C3 

JMP 

/AND CONTINUE THE ASSEMBLY PROCESS 

8D 

73 

NN 


SE 

08 

0 
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/•OCTQ* IS USED ONLY VHEN AN IMMEDIATE 
/ IN STRUCTION IS ASSEMBLEO. VE VANT TO SEE IF 
/THE SECOND (DATA) BYTE IS A N UH BER. QUOTED 
/CHARACTERS. SUCH AS ‘2‘ OR *»"» OR A DEFIN ED BYTE. 


OCTQ. CALE 
FINCH 
0 

LHLD 

TFMLIN 

0 

MOVAM 

CPI 

042 

JNZ 

OB 

0 

QUOTE. INXH 
MOVBM 
INXH 
MOVAM 
CPI 
042 
JZ 

0KQ2 

0 

CALL 
UDO UT 

0 

MVIB 

000 

0KQ2. MOVAB 
JMP 
ZEOUTt 
0 


/FIND MNEMONIC OR DATA VALUE 
/H4L POINT TO THE FIRST CHARACTER 


/GET THE FIRST CHARACTER 
/IS IT A QUOTE ? 

/NO. THEN IS THE DATA BYTE A NUMBER » 


/VE FOUND ONE *. IS THERE ANOTHER *7 
/SAVE THE CHARACTER JUST AFTER THE * 

/THIS SHOULD BE THE 2ND * 

/IS THI S THE 2ND * » 

/YES. THEN B CONTAINS THE ASCII CHARACTER 


/THE »D QUOTE VAS MISSINO. ITS AN 
/IN DEFIN ED SYMBOL (UD) 

/SO TYPE THE *UD* ERROR MESSAGE" 
/DATA FOR THE IMMEDIATE 
/INSTRUCTION IS SET TO 000 
/A NOV » # S THE QUOTED CHARACTER 


LXt. 


MOVAB /ALL LX1 INSTRUCTION HAVE AN EVEN 
ANI /MIDDLE BYTE (0.2.4 OR 6) 

110 

JNZ /ir D4-I. ITS NOT AN LXI INSTRUCTION 

GENENT /SO TREAT IT AS A SINGLE BYTE INSTRUCTION 

0 

JMP /OK. ITS A LXIB.D.H OR SP 
SYMOCT /SO SEE IF A SYMBOLIC ADDRESS 
0 /FOLLOWS OR OCTAL OR HEX NUHBERS 


DPLS. MOVAB 
CPI 
042 
JC 

GENENT 

0 

SYMOCT. CALL 
FIN DM 


/ALL THE DOUBLÉ PRECI SION LOADS HAVE 
/EMEMONIC VALUES GREATER THAN 041 
/SUCH AS 042. 052. 062 AND 072 (OCTAL) 
/NOT AN SHLD. LHLD. STA OR LDA 


/FIND THE OCTAL » OR SYMBOLIC ADDRESS 
/IN THE SECOND BYTE 
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99 

BE 

08 


0 


99 

BT 

2A 


LKLD 


99 

CO 

30 


TFMLIN 


99 

CI 

18 


0 


99 

C2 

2B 


DCXH 


99 

C3 

CD 


CALL 

/SEE IF NUMBERS ARE 

99 

C4 

27 


THfHMB 

/AFTER THE IN5TRUCTI0N 

99 

C5 

OD 


0 


99 

C 6 

CA 


JZ 

/HO. NO VALID NUMBERS FOLLOV 

99 

C7 

FB 


CHKSYM 

/SEE IF ITS A SYMBOLIC ADDRESS 

•9 

C8 

09 


0 


99 

C9 

79 

LOVOK* 

MOVAC 

/THERE VERE #*S» C-TKE LOV ADDRESS 

99 

CA 

32 


STA 


99 

CB 

36 


MNEVAL 


99 

CC 

18 


0 


99 

CD 

06 


H VI B 

/PIMCH OUT OR PR1NT THE LO ADDRESS BYTE 

99 

CE 

FF 


377 


99 

CF 

CD 


CALO. 


09 

DO 

AO 


CRI 0 

/FIND THE NEXT LINE CON TAIN ING THE HI ADD. 

99 

DI 

OD 


0 


09 

D2 

CD 

NMONLY# 

CALL 

/FINO THE "MNEMONIC" IN THE LINE 

09 

D3 

84 


FIN DM 


09 

D4 

08 


0 


99 

D5 

2A 

OB, 

LKLD 


09 

D6 

30 


TFMLIN 


09 

D7 

18 


0 


09 

D6 

EB 


XCHG 

/NOV SEE IF THE BYTE IS DEFIN ED 

09 

D9 

2A 


LKLD 

/IN THE "BYTAB" 

09 

DA 

12 


BYTAB 


09 

DB 

18 


0 


09 

DC 

06 


M VI B 

/THIS IS THE "SXIP COINTER" 

09 

DD 

02 


002 


09 

DE 

OE 


M VI C 

/C-TEFMINATOR-EOUAL SIGN 

09 

DF 

3D 


075 


09 

E0 

CD 


CALL 


09 

Et 

6E 


SEARCH 

/SEE IF ITS IN THE TABLE 

09 

E2 

OB 


0 


09 

E3 

FE 


CP1 

/FIND THE END OF THE TABLE 7 

09 

E4 

9B 


BTERM 

/IF NOT» THERE IS A SIM1LAR ENTRY 

09 

E5 

ce 


JNZ 


09 

E6 

4B 


NZ 

/IT VAS IN THE TABLE» VALUE 

09 

E7 

OA 


0 

/VAS STORED IN "MNEVAL" BY "SEARCH" 

09 

E8 

2A 


LKLD 

/IT VASN'T IN THE TABLE 

09 

E9 

30 


TFMLIN 

/SEE IF ITS MI OCTAL OR HEX N LM BER 

» 

EA 

18 


0 


09 

EB 

2B 


DCXH 

/IT MUST BE A NUMBER ALSO 

09 

EC 

CD 


CALL 


09 

ED 

27 


THFNMB 

/INTERPRETE THE NUMBER 

09 

EE 

OD 


0 


09 

EF 

C2 


JNZ . 

/IT VAS VALI D» THE VALUE IS IN "C" 

09 

F0 

F7 


OCTEND 


09 

FI 

09 


0 


09 

F2 

CD 


CALL 

/IT VAS NOT A VAL I D N IH BER 

09 

F3 

OE 


BNOUT 

/TYPE THE "BAD NUMBER " C EM > 
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09 

F4 

OD 


0 

/ERROR MESSAGE* AND SET C-0 00 

09 

F5 

OE 


MVIC 

/C IS THE THRNNB RESISTER 

09 

F6 

00 


000 


09 

F7 

79 

OCTEND* 

MOVAC 


09 

F8 

C3 


JMP 


09 

F9 

48 


Z EOUTI 

/PUNCH OR PRINT THE NUMERI C VALUE 

09 

FA 

OA 


0 


09 

FB 

2A 

CHXSYM* 

LHLD 

/SEE IF THE WORD IS 

09 

FC 

30 


TFMLIN 

/A SYMBOLIC ADDRESS 

09 

FD 

18 


0 


09 

FE 

EB 


XCHG 

/D4E PO INT TO THE CHARACTER IN THE BUFFER 

W 

FF 

2A 


LHLD 


0A 

00 

39 


SYMADD 


OA 

01 

18 


0 


OA 

02 

OE 


MVIC 

/THIS IS THE STR1NG TERMINATOR 

OA 

03 

3D 


075 


OA 

04 

06 


M VI B 

/THIS IS THE NUMBER OF BYTES TO SKIP 

OA 

05 

03 


003 


OA 

06 

CD 


CALL 


OA 

07 

6E 


SEARCH 

/SEARCH THE SYMBOLIC ADDRESS TABLE 

OA 

08 

OB 


0 

/POR A MATCH VI TH THE TEXT BUFFER WORD 

fe 

09 

FE 


CPI 


OA 

OA 

9B 


BTERM 

/END OF THE BUFFER YET7 

OA 

OB 

C2 


JNZ 


OA 

OC 

18 


NOSYMA 

/IT VAS IN THE TABLE* THE 

OA 

OD 

OA 


0 

/LO ADD. IS IN MNEVAL* HI IN MNEVAL*! 

OA 

OE 

2E 

BADHL» 

MVIL 

/THERE VAS NO SYMBOL IN THE 

OA 

OF 

00 


000 

/TABLE* SO SET THE ADDRESS 

OA 

IO 

26 


M VI H 

/TO 000 000 

OA 

1 1 

00 


000 


OA 

12 

22 


SHLD 

/AND SAVE IT FOR USE LATER« 

OA 

13 

36 


MNEVAL 


OA 

14 

18 


0 


OA 

15 

CD 


CALL 

/PRINT A "UD AT LINE #* 

OA 

16 

2C 


UDO UT 


OA 

17 

IO 


0 


OA 

18 

06 

NOSYMA* 

MVIB 

/SET B TO 377* SO BOTH THE ADDRESS 

OA 

19 

FF 


377 

/AND LINE COUNT ARE INRC. BY ’CRIO* 

OA 

IA 

CD 


CALL 

/PUT OUT THE LOV ADDRESS ON TAPE 

OA 

1B 

AO 


CR10 

/OR LISTING VHI CHE VER 

OA 

1C 

OD 


0 


OA 

1D 

CD 

ZNEXT* 

CALL 

/VE FOUND THE SYMBOLIC ADDRESS ON 

OA 

IE 

84 


FINCH 

/THE 2ND LINE* MAKE SURE THERE IS A 0 

OA 

IF 

08 


0 

/ON THE 3RD LINE OF TEXT 

OA 

20 

FE 


CPI 


OA 

21 

9B 


BTERM 


OA 

22 

CA 


JZ 

/END OF TEXT BUFFER AND NO 0 7 

OA 

23 

3A 


NZER 

/YES* THEN PRINT A ERROR MESSAGE 

OA 

24 

OA 


0 

/(NZ AT LINE #> AND KEEP GOING* 

OA 

25 

FE 


CPI 


OA 

26 

24 


044 

/DOLLAR SI GN 

OA 

27 

CA 


<1Z 

/END OF TEXT BUFFER AND NO 0 7 

OA 

28 

3A 


NZER 

/YES* THEN PRINT AN ERROR MESSAGE 
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29 

0A 


0 

/<NZ AT LIME #> AND KEEP GOING. 

2A 

2A 


LHLD 

/OH. SEE IF THERE REALLY VAS A 0 

2B 

30 


TFMLIN 


2C 

18 


0 


2D 

2B 


DCXH 


2E 

CD 


CALL 

/CONVERT THE ASCII *0* TO BIMARY 

2F 

27 


THRNNB 


30 

OD 


0 


31 

CA 


JZ 

/THERE VAS MO ZERO AFTER THE SYMBOLIC 

32 

3A 


NZER 

/SO PRIMT THE ERROR HESSAGE "NZ AT 

33 

0A 


0 

/#* AND THEN CONTINUE ON 

34 

79 


MOVAC 

/GET THE CONVERSION VALUE 

35 

F E 


CPI 

/IS IT EQUAL TO ZER07 

36 

00 


000 


37 

CA 


JZ 

/YES, THEN EVERYTHING IS OH. 

38 

45 


zeout 


39 

OA 


0 


3A 

ES 

NZERf 

PUSHH 

/THERE VAS NO 0. SO TYPE THE "NZ" 

3B 

21 


LXIH 

/ERROR HESSAGE. 

3C 

6C 


N ZERO 


3D 

1 1 


0 


3E 

CD 


CALL 


3F 

OE 


LISTI 


40 

OF 


0 


4 1 

E1 


POPH 


42 

C3 


JMP 

/NO 0. SO VE HAVE H4L POINTING TO 

43 

89 


QENEMT 

/TO THE NEXT LINE OF CODE 1 

44 

09 


0 


45 

3A 

ZEOUT# 

LDA 

/THERE VAS A 0< SO TRANSFER THE HI 

46 

37 


MNEVAL+ 1 /ADDRESS TO "MNEVAL". THE CONTINTS OF 

47 

18 


0 

/ “MN E VAL “ IS VHAT GETS PINCHED OUT OR 

48 

32 

zeouti# 

STA 

/LISTED< THATS VHY VE HAVE TO DO 

49 

36 


UN E VAL 

/THIS DATA TRANSFER 

4A 

18 


0 


4B 

06 

NZa 

M VI B 

/LOAD B VITH 377 SO THAT CRIO IN- 

4C 

FF 


377 

/ CREM EH TS THE ADDRESS AND LINE CNT. 

4D 

CD 


CALL 

/PUNCH OR LIST THE VALUE THEN 

4E 

AO 


CRIO 

/GET THE NEXT LINE OF TCCT 

4F 

OD 


0 


50 

C3 


JMP 

/THEN CONTINUE THE ASSEMBLY PROCESS 

51 

6* 


GEN ENT 


52 

09 


0 


53 

2A 

DEST# 

LHLD 

/H4L POINT TO THE ASCII CHARACTER 

54 

43 


REO 

/THAT REPRESENTS THE DESTINATION REGI STER. 

55 

18 


0 


56 

CD 


CALL 


57 

8B 


VALLET 

/IF NOT VALID# TYPE A "UD" 

56 

OA 


0 

/ERROR HESSAGE 

59 

07 


RLC . 

/GET THE DESTINATION RESISTER VALUE 

SA 

07 


RLC 

/AND ROTATE IT TO THE THREE 

5B 

07 


RLC 

/MIDDLE BITS. 

5C 

47 


HOVBA 


5D 

3A 


LDA 

/THEN GET THE IWEMONIC'S "VALUE* 
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SE 

36 

HN E VAL 



sr 

18 

0 



6 0 

60 

ADDB 

/ADD THE REGI STER VALUE TO IT. 

61 

32 

STA 

/AND SAVE 

THE RESULT FOR USE 

62 

36 

MNEVAL 

/BY OTHER 

SECTIONS OF THE ASSEMBLER. 

63 

18 

0 



64 

C9 

RET 
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SA 

65 

CD 

NOVI# 

CALL 


0A 

66 

53 


DEST 

/GET THE REGI STER DESTINATION CODE 

IA 

67 

OA 


0 


IA 

68 

CD 


CALL 


OA 

69 

59 


VALTRM 

/IS THERE A VALID TEMINATOR 7 

OA 

6A 

OB 


0 

/(A CR.TAB# SPACE OR SLASH) 

OA 

6B 

06 


M VI B 


OA 

6C 

FF 


377 

/SET THE SIN SE REGI STER TO 377 

OA 

6D 

C3 


JNP 

/(HNEMONIC FOIND) 

OA 

6E 

3F 


FOIND 


OA 

6r 

09 


0 


OA 

70 

CD 

NOVE# 

CALL 

/THERE 1S A DEST1NATION AND SOURCE 

OA 

71 

53 


DEST 

/REGI STER FOR THE NOVE INSTRUCTIONS 

OA 

72 

OA 


0 

/FIRST GET THE DESTINATION CODE 

OA 

73 

23 


INXH 


OA 

74 

CD 

MA7H1# 

CALL 

/THEN GET THE SOURCE «THE HATH 

OA 

75 

8B 


VALLET 

/INSTRUCTIONS ENTER HERE# 1 REGI STER). 

QA 

76 

OA 


0 


OA 

77 

47 


NOVBA 

/SAVE THE REGI STER CODE IN *B* 

OA 

78 

3A 


LDA 

/GET THE MN EMONIO CODE 

OA 

79 

36 


HNEVAL 


OA 

7A 

18 


0 


OA 

7B 

80 


ADDB 

/ADD THE REGI STER CODE 

OA 

7C 

32 


STA 

/AND SAVE THE NEV HNEMONIC CODE 

OA 

7D 

37 


MN EVAL+ 1 

OA 

7E 

18 


0 


OA 

7F 

CD 


CALL 

/SEE IF THERE VAS A CR# SPACE# 

OA 

80 

59 


VALTBM 

/TAB OR SLASH AFTER THE HNEMONIC 

OA 

81 

OB 


0 


OA 

82 

C3 


JMP 


OA 

83 

45 


ZEDUT 


OA 

84 

OA 


0 


OA 

85 

2A 

MATH# 

LKLD 

/ISA HATH IN STRUCTION (ADD# ADC# SUB# SBB# 

OA 

86 

43 


REO 

/CMP# ORA# ANA OR CMP)# SO GET THE 

OA 

87 

18 


0 

/ADDRESS THAT POINTS TO THE REGI STER. 

IA 

88 

C3 


JNP 

/ AN D DETERM IN E THE CODE FOR IT. 

OA 

89 

74 


NATHI 


OA 

8A 

OA 


0 


OA 

8B 

46 

VALL ET. 

no vai 

/GET THE ASCII CHARACTER FOR THE REGI STER 

QA 

8C 

E5 


PUSHH 

/SAVE H«L 

OA 

8D 

21 


LXIH 

/LOAD HAL VI TH THE BASE ADDRESS 

OA 

SE 

BD 


ALL ET 

/OF THE TABLE CON TAIN IN G THE 

OA 

8F 

11 


0 

/VALID ASCII REGI STER CODES. 

OA 

90 

11 


LXID 

/LO AD REGI STER PAIR D VITH THE BASE 

OA 

91 

C6 


ALL ET V 

/ADDRESS OF THE TABLE THAT CONTAINS 

OA 

92 

11 


0 

/THE VALUES (0-7) FOR THE REGI STERS. 

OA 

93 

7E 

TCBCHR# 

HO VATI 

/GET Mi ASCII REG. VALUE FROH THE TABLE 

OA 

94 

FE 


CPI 

/END OF THE TABLE? 

OA 

95 

FF 


377 


OA 

96 

CA 


J Z 

/YES# THSN THE REGI STER SPECI FI ED IN 

OA 

97 

A5 


NOREG 

/THE HNEMONIC IS NOT A VALID 
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IA 

98 

0A 


0 

/RESISTER 

SA 

99 

B8 


CMPB 

/TABLE VALUB* NN EH OH I C VAL U ET 

BA 

9A 

CA 


JZ 

/YES. THEN OET THE VALUE FOR 

0A 

9B 

A2 


LETOK 

/THE REOI STER (1-7). 

IA 

9C 

OA 


0 


IA 

9D 

23 


1NXH 

/NO» INCREMMT THE REGI STER ADDRESS 

SA 

9E 

13 


IMXD 

/INCREMMT THE REGI STER VALUE ADDRESS 

IA 

9F 

C3 


JHP 

/MD TKY TO MAX E A MATCH 

IA 

AB 

93 


TCBCHR 


SA 

Al 

IA 


1 


BA 

A2 

IA 

LETOK. 

LDAXD 

/GET THE REGI STER'S VALUE 

IA 

A3 

E1 


POPH 

/POP THE TEXT BUFFER ADDRESS 

IA 

A4 

C9 


RET 

/MD RETUM 

IA 

A3 

E1 

MOREg* 

POPH 

/POP THE TEXT BUFFER POINTER 

SA 

A6 

CD 


CALL 

/PRINT -UD AT LINE #" BECAUSE 

BA 

A7 

2C 


UDO UT 

/AH INVALI D REGI STER VAS 

IA 

A8 

11 


1 

/SPECI FIED IN THE fMEMONIC 

IA 

A9 

AF 


XRAA 

/SET THE "REGI STER VALUE" TO ZERO 

BA 

AA 

C9 


RET 

/MD RETUM. 




/LOOK 

SETS UP THE SYMBOLIC ADDRESS TABLE. 




/IT FIMDS ALL OF THE USER DEFIHED SYMBOL! C 




/ADDRESSES AH D 

SAVES THEM IN THE "SYMADD" 




/TABLE 

ALO HO VI TH AH E QUAL SI (W «ND THE 2 BYTE 




/< 16 BIT) HI MD LO ADDRESS. A 233 1S SAVED AT 




/THE END OF THE 

TABLE. 

0A 

AB 

2A 

LOOK» 

LHLD 

/H«L POINT TO THE BEGINNING 

IA 

AC 

22 


TXTBUF 

/OF THE TEXT BUFFER 

IA 

AD 

18 


0 


IA 

AE 

22 


SHLD 


BA 

AF 

2E 


TFCLIN 

/SAVE THE POINTER TO THE TEXT» 

IA 

Bl 

18 


0 

/FIRST CHARACTER (IN THE) LINE (TFCLIN) 

BA 

B 1 

06 


HVIB 

/B 15 USED TO SIN SE VHETHER A SYMBOL! C 

IA 

B2 

IO 


000 

/ADDRESS VAS DEFIN ED IN A LINE OF TEXT. 

SA 

B3 

2B 


DCXH 


BA 

B4 

23 

LOOK 1# 

1NXH 


IA 

B5 

TE 


MOVAM 


BA 

B6 

FE 


CPI 


IA 

B7 

24 


044 

/144 IS AH ASCII DOLLAR Sl«. IT 

BA 

B8 

C8 


RZ 

/INDICATES THE END OF THE TEXT BUFFER. 

IA 

B9 

FE 


CPI 


IA 

BA 

9B 


BTERM 

/1F ASSEMBLINO FRON MEMORY» A 233 

SA 

BS 

C8 


RE 

/IS AT THE MD OF THE TEXT BUFFER 

IA 

BC 

FE 


CPI 

/THE 012 IS FOR LOOKING FOR TABS 

0A 

BD 

OA 


112 

/Oli ON TAPE. 0-10 IN MEMORY 

IA 

BE 

DA 


JC 


IA 

BF 

B4 


LOOKI 


IA 

CB 

OA 


0 


IA 

CI 

FE 


CPI 

/FOUND A SLASH (FOR A COMM IN T) IN THE 

IA 

C2 

2F 


057 

/TEXT BUFFER ? 

IA 

C3 

C2 


JNZ 

/NO. SEE 1F ITS A ASTERISK» 

IA 

C4 

cc 


NOSS 


IA 

cs 

IA 


0 
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SA 

C6 

CD 

CROK, 

C ALL 

/FOUSD A COMMENT. SO FIND THE NÉXT LINE 

SA 

C7 

A5 


riNDCR 

/OF TEXT 

SA 

ce 

SD 


0 


«A 

C9 

C3 


JMP 

/AND TEST IT FOR A SYMBOLIC ADDRESS 

SA 

CA 

BS 


LOOK I» I 


SA 

CB 

SA 


0 


0A 

cc 

re 

NOSS, 

CPI 

/NOT A COMMENT, 1S IT A 

SA 

CD 

2A 


052 

/DEFIN ED ADDRESS (*>7 

SA 

CE 

C2 


JNZ 

/NO, NOT AN ADDRESS, SEE IF IT IS 

SA 

cr 

DI 


NOSR 

/A SPACE. 

SA 

DS 

SA 


0 


SA 

DI 

CD 


C ALL 

/ITS AN -, SO PROCESS THE ADDRESS, 

SA 

02 

DC 


ADDOK 

/SAVE THE 16-BIT RESULT IN “ADDCNT“ 

SA 

D3 

se 


s 

/AND PROCESS THE NEXT LINE OF TEXT 

SA 

D4 

C3 


JMP 


SA 

D5 

B5 


LOOK !♦ 1 


SA 

06 

OA 


0 


SA 

07 

re 

NOSR, 

CPI 

/NOT AN *, IS IT A SPACE? 

SA 

06 

20 


040 


SA 

D9 

CA 


JZ 

/YES, THEN IGMORE IT AND GET THE NEXT 

SA 

DA 

B4 


LOOK 1 

/CHARACTER FROM THE SANE LINE OF TEXT 

SA 

DB 

OA 


( 


SA 

OC 

FÉ 


CPI 

/NOT A SPACE, IS IT A CARRIAGE RETURN? 

SA 

DO 

OD 


CR 


SA 

DE 

CA 


JZ 

/YES, THEN FIND THE NEXT LINE OF 

SA 

or 

C6 


CROK 

/TEXT AND PROCESS IT. 

SA 

ES 

OA 


1 


SA 

El 

FÉ 

NOCR, 

CPI 

/NOT A CARRI AGE RETUM, IS IT A COMMA? 

SA 

E2 

2C 


034 


SA 

E3 

CA 


JZ 

/YES, THEN PROCESS THE SYMBOL BELOV. 

SA 

CA 

EB 


SYMCMA 


SA 

E5 

SA 


s 


SA 

E6 

06 


M VI B 

/NONE OF THE ABOVE, SO SET THE 

SA 

E7 

FF 


377 

/B REGI STER TO 377. 

SA 

ES 

C3 


JMP 

/AND CONTINUE EXAMINING TRIS 

SA 

E9 

B4 


LOOKI 

/SAHE LINE OF TEXT. 

SA 

EA 

OA 


0 





/•SYMCNA* CHECK S THE CONTWT OF THE SYMBOL 1C ADDRESS 




/TABLE 

TO SEE ir THE SANE SYMBOL 1C ADDRESS 




/HAS AL READY BEEN STORED IN THE TABLE <TH1S 1S Mi ERROR 




/CON DITION1 REDEF1NITI0NI THE SMIE SYMB0L1C ADDRESS 




/HAS BEEN USED 

AT LEAST TVICE). IF THE SYMBOLIC ADDRESS 




/IS MOT 

IN THE 

TABLE AL READY, THE 8)81 ADDS IT TO THF 




/TABLE# 

ALONG VITH THE ASCII VALUE FOR AN -, AND 




/THE 16 

-BIT CONTINT OF "ADDOIT. " 

SA 

EB 

2A 

SYMCMA# 

LHLD 

/LOAD REGI STER PAIR H V1TH THE ADDRESS 

SA 

EC 

2E 


TFCLIN 

/FOR THE FIRST CHARACTER IN THE SYN- 

SA 

ED 

18 


s 

/BOLIC ADDRESS. 

SA 

EE 

EB 


XCHG 


SA 

ET 

S6 


MVIB 

/N UH BER OF BYTES TO SXIP 

SA 

rs 

03 


SS3 
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•A 

ri 

CD 


C ALL 



«A 

F2 

32 


CHKTB1 

/CHECK THE SYMBOLIC ADDRES5 TABLE 


«A 

F3 

11 


0 

/POR THE SAME ENTRY. IF SO. ERROR 


SA 

F« 

CA 


JZ 

/IT VASN'T IN THE TABLE. SO 


SA 

F5 

FF 


NOSYM 

/ENTER IT. 


SA 

F6 

OA 


0 



SA 

F7 

06 

SYMIN# 

M VI B 

/NOV GET THE NEXT 


SA 

F8 

FF 


377 

/LINE OF TEXT. 


SA 

F9 

CD 

FNL/ 

CALL 

/INCREMENT THE ADDRESS AND LINE 


SA 

FA 

AS 


FIMDCR 

/COUN TER 


SA 

F B 

OD 


0 



SA 

re 

C3 


JHP 

/AND CHEQf THE NEXT LINE OF TEXT 


SA 

FD 

B5 


LOOK 1+ 1 

/POR ANY DEFIN ED SYMBOL1C ADDRESSES 


SA 

FE 

OA 


0 



SA 

FF 

2A 

NOSYH# 

LKLD 

/THE SYHBOLIC ADDRESS VASN'T IN THE 


SB 

OS 

2 E 


TFCLIN 

/TABLE. SO VE VILL IN TER IT IN TO 


OB 

01 

18 


0 

/THE TABLE RIGHT NOV. 


DB 

02 

EB 


XCHG 



SB 

03 

2A 


LHLD 

/GET THE LAST ADDRESS USED FOR STORING 

SB 

04 

3B 


SYHADF 

/A SYHBOLIC ADDRESS (INITIALLY EQUAL 

TO 

OB 

OS 

18 


0 

/SYHADD). 


OB 

06 

IA 

SAVMOR, 

LDAXD 

/D4E POINT TO THE TEXT BUFFER 


OB 

07 

FE 


CP1 

/FINO THE COMMA AFTER THE SYHBOLIC 


SB 

08 

2C 


0 54 

/ADDRESS IN THE TEXT BUFFER YET 7 


OB 

09 

CA 


JZ 

/YES. THIN IN TER AN - SI OS AND 


OB 

OA 

2F 


ESA 

/THE LO AND HI ADDRESS VHERE IT 


OB 

OB 

OB 


1 

/VAS DEFIN ED. 


SB 

OC 

FE 


CP1 

/FINO THE SPACE REQUIRED IN THE 


SB 

SD 

20 


040 

/FOIMAT FOR THE *DV PSEUDO-OP 7 


OB 

OE 

CA 


JZ 

/YES. THIN CALCULATE THE ADDRESS 


OB 

8F 

4A 


SPECDF 

/AND IN TER IT AND AN • SION IN 


OB 

10 

OB 


0 

/THE SYHBOLI C ADDRESS TABLE 


OB 

11 

77 


HO VMA 

/SAVE THE TEXT CHARACTER IN THE SYM. 

TABLE 

SB 

12 

23 


INXH 

/IN CREN IN T THE TEXT AND TABLE POINTERS 

OB 

13 

13 


INXD 



OB 

14 

D5 


PUSHD 



SB 

15 

EB 


XCHG 



OB 

16 

2A 


LHLD 

/HAS THE SYHBOLI C ADDRESS TABLE 


OB 

17 

12 


BYTAB 

/RIM INTO THE *DB* TABLE 7 


OB 

18 

18 


0 



OB 

19 

7D 


HO VAL 



OB 

IA 

93 


SUBE 



SB 

1B 

47 


MOVBA 



•B 

1C 

7C 


HOVAH 



SB 

1D 

9A 


SBBD 



OB 

1E 

EB 


XCHG 



OB 

IF 

DI 


POPD 



SB 

20 

D2 


JNC 

/NOT YET. ENTER ANOTHER TEXT CHARACTER 

OB 

21 

06 


SA Vii OR 

/INTO THE SYHBOLIC ADDRESS TABLE 


SB 

22 

OB 


0 



SB 

23 

21 


LX1H 

/YES. THE TVO TABLES HAVE RIM INTO 


OB 

24 

72 


HE 

/EACH OTHER. SO VE NEED MORE MEMORY. 


OB 

25 

1 1 


0 

/THIS IS A FATAL ERROR. THE ASSEMBLY 
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0B 

26 

CD 

FATAL# 

CALL 

/PROCESS CAN NOT CONTINUE IT THIS 

0B 

27 

OE 


LISTI 

/OCCURS. 

OB 

28 

ir 


0 


OB 

29 

31 


LXISP 

/RESET THE STACK POINTER 

OB 

2 A 

AO 


STACX 


OB 

2B 

18 


0 


OB 

2 C 

C3 


JMP 

/THE HE" ERROR IS FATAL TO THE 

OB 

2D 

6B 


QUEST 

/ASSEMBLY PROCESSO GOTO THE CORNANO 

OB 

2E 

00 


0 

/DECODER. 

OB 

2F 

36 

ESA» 

M VIM 

/SAVED ALL OF THE CHARACTERS. 

OB 

30 

3D 


075 

/SAVE M - Sia* TERMINATOR 

OB 

31 

23 


INXH 

/NOV GET THE ADDRESS AND SAVE IT ALSO. 

08 

32 

EB 


XCHG 


OB 

33 

2A 


LHLD 


OB 

34 

34 


ADDCNT 

/GET THE "CURRENT ADDRESS’ MO ASS1W IT 

OB 

35 

18 


0 

/TO THE SYMBOL1C ADDRESS HE JUST ENTERED 

OB 

36 

CD 


CALL 

/NOV SAVE THE VALUE IN THE TABLE 

OB 

37 

3C 


SAVADD 


OB 

38 

OB 


0 


OB 

39 

C3 


JMP 

/NON FIND THE NDCT LINE OF CODE 

OB 

3A 

F7 


SYHIN 

/AND ASSFMBLE IT. 

OB 

3B 

OA 


0 


OB 

3C 

7D 

SAVADD* 

HO VAL 


OB 

3D 

12 


STAXD 

/GET THE CURRENT ADDRESS AND SAVE IT 

OB 

3E 

13 


1NXD 


OB 

3F 

7C 


MOVAH 


OB 

40 

12 


STAXD 


OB 

41 

13 


INXD 


OB 

42 

3E 


M VIA 

/NOV SAVE A 233 TEIWINATOR AFTER 

OB 

43 

9B 


BTERM 

/THE ADDRESS TO INDICATE THE 

OB 

44 

12 


STAXD 

/END OF THE TABLE 

OB 

45 

EB 


XCHG 


OB 

46 

22 


SHLD 

/SAVE THE LAST ADDRESS USED. THIS VILL 

OB 

47 

3B 


SYMADF 

/BE VHERE THE NEXT ENTRY STARTS. 

OB 

48 

18 


0 


OB 

49 

C9 


RET 


OB 

4A 

36 

SPECDF* 

MVIM 

/SAVE A - SION ALSO 

OB 

4B 

3D 


075 


OB 

4C 

23 


INXH 

/INCRENENT PAST THE - SI(M 

OB 

4D 

EB 


XCHG 

/HAL ARE TEXT» D4E ARE TABLE ADDRESSES 

08 

4E 

DS 


PUSHD 


OB 

4F 

CD 


CALL 

/NOV CALCULATE THE ADDRESS THAT 

OB 

50 

C4 


ADBYTE 

/THE USER ASSI (MED TO THE SYMBOL 

OB 

SI 

OC 


0 


OB 

52 

DI 


POPD 

/GET THE TABLE ADDRESS BACK 

OB 

53 

CD 


CALL 

/SAVE IT IN THE TABLE 

OB 

54 

3C 


SAVADD 


OB 

55 

OF 


0 


OB 

56 

Co 


JMP 

/AND THEN RE-ENTER THE "PSEUDO-OP" 

OB 

57 

23 


PSEUDO 

/PROCESSING ROUTINE 

OB 

58 

11 


0 
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/VALTRM IS USED TO SEE IF THERE ARE ANY LEFTOVERS 
/AT THE "END" OF THE PARTIAL MNEMONICS. OCTAL #'S ETC. 
/THIS PREVENTS MO VABC, 123E, 1NRBC AND SO ON. 

/BY CHECKING FOR A VALI D TEWINATOR 


0B 

59 

23 

VALTRM, INXH 

/INCREMENT PAST THE REGI STER IN HEM. 

0B 

5A 

7 E 

NOVAM 

/GET THIS CHARACTER 

0B 

5B 

FE 

CPI 

/A CR AFTER THE REGI STER7 

0B 

se 

OD 

CR 

/A CR IS A VALI D TEIMINATOR 

0B 

SD 

C8 

RZ 

/YES, THEN ITS TERMINATED CORRECTLY. 

0B 

5E 

FE 

CPI 

/SLASH FOR A COMMENT? 

0B 

5F 

2F 

0 57 


0B 

60 

C8 

RZ 

/YES, THEN RETURN 

DB 

61 

FE 

CPI 


0B 

62 

20 

040 

/FOUND A SPACE 7 

OB 

63 

CA 

JZ 

/YES TRY THE NEXT CHARACTER IN MEMORY 

OB 

64 

59 

VALTRM 


OB 

65 

OB 

0 


OB 

66 

FE 

CPI 


OB 

67 

0A 

012 

/THE SAME GOES FOR TABS SINCE VE 

OB 

68 

DA 

JC 

/CAN USE MULTIPLE TABS 

OB 

69 

59 

VALTRM 


OB 

6A 

OB 

0 


OB 

6B 

C3 

JMP 

/THERE IS AN INVALID TERMINATOR AFTER 

OB 

6C 

2C 

UDO UT 

/THE LAST REGI STER, SO PRINT 

OB 

6D 

10 

0 

/"UD AT LINE » •• 


/ENTER SEARCH VITH DA E POINTING TO THE FIRST CHARACTER 
/IN THE TEXT BUFFER AND HAL POINTING TO THE BEGINNING 
/OF THE SYMBOL 1C ADDRESS TABLE OR THE MNEMONIC TABLE. 
/C-THE SYMBOL TERMINATOR, B» t OF MEMORY LOCATIONS TO 
/SKIP AFTER THE TERMINATOR HAS BEEN FOIND, TO GET TO 
/THE NEXT ‘SYMBOL". 


0B 

6E 

EB 

SEARCH, 

XCHG 

/D*E SYMADD, HAL TEXT 

0B 

6F 

22 


SKLD 


0B 

70 

45 


TMPADD 


0B 

71 

18 


0 


OB 

72 

2A 

SKPMOR, 

LHLD 

/GET THE ADDRESS OF THE BEGINNING 

0B 

73 

45 


TMPADD 

/OF THE STRINO BEINO SEAROHED FOR 

OB 

74 

18 


0 

/THIS IS THE ADDRESS IN THE TEXT BUFFER 

0B 

75 

IA 


LDAXD 

/GET A CHARACTER FROM THE TABLE 

0B 

76 

FE 


CPI 


0B 

77 

9B 


BTERM 


0B 

78 

C8 


RZ 

/VE EXIT THIS VAY THE FIRST TIME THRDUGH 

0B 

79 

1A 

SRCH1, 

LDAXD 

/GET A CHARACTER FROM THE TABLE 

OB 

7A 

B9 


CMPC 

/IS IT A TERMINATOR <- OR ,) 7 

OB 

7 B 

CA 


JZ 

/YES, VE FOIMD THE END OF THE STRINO 

OB 

7C 

97 


STRIND 

/IN THE TABLE, IS IT AL SO THE END OF 

OB 

7D 

OB 


0 

/THE STRING IN THE TEXT BUFFER 7 

OB 

7E 

BE 


CMPM 

/TABLE CHARACTER - TEXT CHARACTER 7 

OB 

7 F 

C2 


JN Z 

/NO, FIN D THE NEXT ENTRY IN THE TABLE 

OB 

80 

87 


NXTMN E 

/AND START THE COMPARI SON AGAIN 

OB 

81 

OB 


0 
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0B 

82 

23 


INXH 

/YES» THEY MATCH 

0B 

83 

13 


INXD 

/INCREMENT BOTH DATA POINTERS 

DB 

84 

C3 


JMP 


OB 

85 

79 


SRCH 1 


OB 

86 

OB 


0 


OB 

87 

13 

NXTWNE# 

INXD 

/THEY DI IN 'T MATCH. FINO THE N EXT 

OB 

88 

1A 


LDAXD 

/ENTRY IN THE TABLE BEING SEARCHED 

OB 

89 

B9 


CNPC 

/FIND THE » OR ■ SI®I YET 7 

OB 

SA 

C2 


JNZ 


08 

8B 

87 


NXTHN E 

/NO 

OB 

8 C 

OB 


0 


OB 

8D 

C5 

NOTPOM# 

PUSHB 

/YES 

OB 

SE 

13 

SKIP# 

INXD 


OB 

8F 

05 


DCRB 


OB 

90 

C2 


JNZ 

/SKIP OVER THE 1 OR 2 OCTAL * 'S DUE TO 

OB 

91 

SE 


SKIP 

/THE NNEMONIC OR SYMBOLIC ADDRESS VALUE 

OB 

92 

OB 


$ 


OB 

93 

CI 


PO PB 


OB 

94 

C3 


JMP 


OB 

95 

72 


SKPWOR 

/TRY IT AGAIN VITH A DIFFERENT ENTRY 

OB 

96 

OB 


0 

/IN THE TABLE BEING SEARCHED 

OB 

97 

13 

STREND# 

INXD 


OB 

98 

IA 


LDAXD 

/GET PAST ■ AND GET THE VALUE 

OB 

99 

32 


STA 

/THIS IS FOR MOVES AND MATH. LOGIC 

OB 

9A 

36 


NNEVAL 


OB 

9B 

18 


0 


OB 

9C 

13 


INXD 


OB 

9D 

1A 


LDAXD 


OB 

9E 

32 


STA 


OB 

9F 

37 


MN EVAL» 1 

OB 

AO 

18 


0 


OB 

Al 

IB 


DCXD 

/FOR THE WD BYTE OF ADDRESS 

OB 

A2 

1B 


DCXD 

/IF A SYMBOLIC ADDRESS SEARCH 

OB 

A3 

22 


SKLD 


OB 

A4 

43 


REG 

/SAVE H AL IN ‘REG* FOR PARTI AL MN EMON ICS 

OB 

AS 

18 


0 


OB 

A6 

C3 


JMP 


OB 

A7 

BO 


MNEND 


OB 

A8 

OB 


0 


OB 

A9 

13 

SAWAL# 

INXD 

/SKIP OVER THE » OR - IN THE TABLE 

OB 

AA 

1A 


LDAXD 

/GET THE TABLE VALUE 

OB 

AB 

32 


STA 


OB 

AC 

36 


MN EVAL 

/SAVE IT 

OB 

AD 

18 


0 


OB 

AE 

AF 


XRAA 

/ON EXIT IF A- 0 0 0» VE HAD A MATCH 

OB 

AF 

C9 


RET 



/‘MNIND* CHECK S TO SEE IF THERE IS A VAL ID TEJWINATOR 
/AFTER THE MN EMONI C. A TERMINATOR COULD BE A CARRAGE 
/RETURN» SPACE» TAB. SLASH FOR A COMMENT (OR A COMMA 
/VHEM VE ARE ENTER1NG A SYMBOLI C ADDRE5S IN TO “ SYMADD" ) • 

IB B0 7E MNEND» MOVAM 
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•B 

B1 

F E 


CPI 



OB 

B2 

OD 


CR 

/CR AFTER A MNEMONIC7 


OB 

B3 

CA 


JZ 



OB 

B4 

A9 


SAWAL 



OB 

B5 

OB 


0 



OB 

B6 

FE 


CPI 



IB 

B7 

20 


140 

/SPACE AFTER THE MNEMONIC 7 


OB 

B8 

CA 


JZ 



OB 

B9 

A9 


SAWAL 



OB 

BA 

OB 


• 



OB 

BB 

FE 


CPI 



OB 

BC 

2F 


057 

/COMM EN T AFTER MNEMONIC 


OB 

BD 

CA 


JZ 



OB 

BE 

A9 


SAWAL 



IB 

BF 

OB 


• 



OB 

CO 

FE 


CPI 



IB 

CI 

OA 


012 

/A TAB OR THE » OF SPACES 7 


IB 

C2 

DA 


JC 



OB 

C3 

A9 


SAWAL 



OB 

C4 

OB 


• 



IB 

CS 

FE 


CPI 



OB 

C6 

2C 


054 

/THE COMMA OF A SYWBOLIC ADDRESS 

OB 

C7 

CA 


JZ 



OB 

C8 

A9 


SAWAL 



OB 

C» 

OB 


0 



OB 

CA 

FE 


CPI 

/IS THERE A ♦ OR - AFTER 


•B 

CB 

2B 



/THE SYMBOLI C ADDRESS 


OB 

CC 

CA 


JZ 



OB 

CD 

D4 


PORM 



IB 

CE 

OB 


0 



OB 

CF 

FE 


CPI 



OB 

DO 

2D 





IB 

Di 

C2 


JNZ 



OB 

D2 

SD 


NOTPOM 

/NOT A VALI D TERMINATOR. 5X1 P 

IT IN THE 

OB 

D3 

OB 


0 

/TABLE AN D TRY THE MEXT ENTRY 


IB 

DA 

E5 

PORM» 

PUSHH 

/CALCOLATE THE OFFSET 


OB 

DS 

CD 


CALL 

/SAVE THE TEXT ADDRESS AND 


OB 

D6 

27 


THMMB 

/CALCOLATE THE OFFSET 


OB 

D7 

OD 


0 



OB 

DB 

CA 


JZ 

/INVALID NUHBERS VERE USED 


IB 

D9 

F6 


BDBIAS 



OB 

DA 

OB 


0 



OB 

DB 

06 


H VI B 

/» IS II C> SO SET ^100 


OB 

DC 

00 


000 



IB 

DD 

E1 


POPH 

/GET THE TEXT POINTER BACK 


IB 

DE 

7E 


HO VAX 

/SHOULD HE ADD OR SUBTRACT THE 

B1AS 7 

OB 

DF 

FE 


CPI 



OB 

EO 

2D 


*-• 



IB 

E1 

CA 


JZ 

/SUBTRACT IT» IT WAS A *-* 


• B 

E2 

ED 


SUBÌAS 



OB 

E3 

OB 


0 



OB 

E4 

2A 

ADBIAS. 

LHLD 

/GET THE BASE ADDRESS 


IB 

E5 

36 


HN E VAL 



IB 

E6 

18 


0 
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0B 

ET 

09 

DADB 

/ADD THE OFFSET 

0B 

ES 

22 

SAVBIS» SHLD 

/AND SAVE THE NEV ADDRESS 

0B 

E9 

36 

MN E VAL 


8B 

EA 

18 

0 


OB 

EB 

AF 

XRAA 

/NOV MAKE IT LOOK L1KE HE ACTUALLY 

OB 

EC 

C9 

RET 

/FOIWD THE ENTRY IN THE TABLE 

OB 

ED 

79 

SUBÌ AS» MOVAC 

/SUBTRACT10N 1S THE SANE AS ADDING 

OB 

EE 

2F 

CHA 

/THE 2'S COMPLEMENT 

OB 

EF 

AF 

MOVCA 


OB 

FO 

06 

M VI B 


OB 

FI 

FF 

377 


OB 

F2 

03 

INXB 

/NOV VE HAVE INCREMENTED THE COMPLEMENT 

OB 

F3 

C3 

JMP 


OB 

FA 

EA 

ADBIAS 


OB 

F5 

OB 

0 


OB 

F6 

E1 

BDBI AS» POPH 

/POP THE TEXT BUFFER ADDRESS FOR ♦ OR - 

OB 

F7 

CD 

CALL 

/THE B1AS FACTOR DID NOT CONTAIN 

OB 

F8 

2C 

UDO UT 

/VALI D NUMBERS» PRINT THE *UD‘ 

OB 

F9 

10 

0 

/ERROR MESSAGE» l)N DEFIN ED SYMBOL 

OB 

FA 

2E 

MVIL 


OB 

FB 

00 

000 

/SET THE ADDRESS TO 000 000 

OB 

FC 

26 

NV1H 


OB 

FD 

00 

000 


OB 

FE 

C3 

JMP 


OB 

FF 

E8 

SAVBIS 


OC 

00 

OB 

0 





/THIS 1S USED 

FOR THE TTY OUTPUT ON THE 3RD PASS 




/IT TYPES OUT 

THE CURRENT ADDRESS CO UN TER AS A 




/H AL ADDRESS 

AND THE VALUE OF THE MNEMONIC 




/AT THAT ADDRESS. 

oc 

01 

2A 

HLMOUT, LHLD 

/GET THE 'CURRENT ADDRESS CNTR* INTO HAL 

oc 

02 

3A 

ADDQ1T 


oc 

03 

18 

0 


oc 

OA 

CD 

CALL 

/PRINT OUT THE CONTENTS OF H4L 

oc 

05 

AD 

KLOUT 


oc 

06 

05 

0 


oc 

07 

3A 

LDA 

/GET THE VALUE OF THE MNEMONIC 

oc 

08 

36 

MNEVAL 

/AT THAT ADDRESS 

oc 

09 

18 

0 


oc 

OA 

CD 

CALL 

/AND PRINT IT OUT 

oc 

OB 

B2 

OCTOUT 


oc 

OC 

05 

0 


oc 

OD 

3E 

HVIA 

/AND PRINT AN ADDI TI ON AL SPACE AFTER IT 

oc 

OE 

AO 

2A0 


oc 

OF 

C3 

JMP 


oc 

IO 

OF 

IOO 


oc 

11 

18 

0 



/-IOCHK- CHECKS VH1CH PASS IS CURRENTLY BEINO EXECUTED. 
/IF IT'S PASS l IPUTTING SYMB. ADDRESSES INTO “SYMADD") 
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/ " 1OCKK " DO ES NOTHING* IT I TS PASS S, VE PINCH A 
/PAPER TAPE (ir PASS 2, *PASS* - 120 (ASCII "P" ) ). ir 
/PASS 3» VE GENERATE A PRINT OUT OP THE PROGRAM 
/("PASS" ■ 114 ■ ASCII 'L* POR LIST). 


oc 

12 

3A 

IOCXK. 

LDA 


oc 

13 

42 


PASS 


oc 

14 

18 


0 


oc 

15 

r e 


CPI 


oc 

16 

rr 


377 

/PASSI 

oc 

17 

C8 


RZ 


oc 

18 

rE 


CPI 


oc 

19 

50 


120 

/P-PUNCH 

oc 

1A 

CA 


JZ 


oc 

1B 

A9 


BYTE 


oc 

1C 

or 


0 


oc 

ID 

r e 


CPI 


oc 

1E 

4C 


114 


oc 

ir 

CO 


MZ 


oc 

20 

CD 

LI STER. 

CALL 

/PRINT THE HI AND LO MEMORY 

oc 

21 

01 


HLMOUT 

/ADDRESS AND THE CONTENTS or THAT ADDRESS 

oc 

22 

OC 


0 


oc 

23 

2A 

SPECL. 

LKLD 

/HAL N0V POINT TO THE ri RST CHARACTER 

oc 

24 

2E 


TTCLIN 

/VITHIN A LINE OP TEXT 

oc 

25 

18 


0 


oc 

26 

OE 

SETTAR. 

M VI C 

/NOV SET THE TAB STOP CO IN TER TO 8 

oc 

27 

08 


010 


oc 

28 

7E 

LI STNT» 

MOVAM 

/NOV GET A TEXT CHARACTER Mi D SEE 

oc 

29 

rE 


CPI 

/VHAT VE SHOULD PRINT 

oc 

2A 

OA 


012 

/0-10 OR Oli MEAN S TO TYPE SPACES 

oc 

2B 

DA 


JC 

/UNT1L VE GET TO THE TAB STOP (C> 

oc 

2C 

40 


TABOK 


oc 

2D 

OC 


0 


oc 

2E 

r e 


CPI 


oc 

2r 

OD 


CR 

/POIMD A CR, TYPE A CR * LP AND 

oc 

30 

CA 


JZ 

/THEN SEE VHETHER VE START A NEV PAGE 

oc 

31 

49 


CRFND 


oc 

32 

OC 


0 


oc 

33 

CD 


CALL 

/NEITHER OP THOSE» SO JUST PRINT IT 

oc 

34 

or 


100 

/I-O DEVI CE* OUTPUT TYPE 

oc 

35 

18 


0 


oc 

36 

OD 


DCRC 

/CECREMENT THE TAB STOP CO IN TER 

oc 

37 

C2 


JNZ 

/-0 YET ?» NO GET ANOTHER CHARACTER 

oc 

38 

3C 


REENTR 


oc 

39 

OC 


0 


oc 

3A 

OE 


MVIC 

/YES» RESET I T TO 8 ( DEC 1M AL ) THEN 

oc 

3B 

OS 


010 


oc 

3C 

23 

REENTR# 

INXH 

/NOV IN CREMEN T THE TEXT POINTER 

oc 

3D 

C3 


JMP 


oc 

3E 

28 


LI STNT 

/AND PRINT IT OUT AL SO 

oc 

3r 

OC 


0 
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oc 

40 

3E 

TABOK# 

N VI A 

/IT VAS A TAB# PRINT SPACES TO THE 

oc 

41 

AO 


240 

/NEXT TAB STOP. 

oc 

42 

CD 


CALL 


oc 

43 

88 


SIXSPC*4 

oc 

44 

OF 


0 


oc 

4S 

23 


INXH 


oc 

46 

C3 


JHP 


oc 

47 

26 


SETTAB 


oc 

48 

OC 


0 


oc 

49 

CD 

CRFND# 

CALL 

/PRINT THE CR4LF# THEN CHECK TO 

oc 

4A 

39 


CRLF 


oc 

4B 

02 


0 


oc 

4C 

C3 


JHP 

/SEE IF VE SHOULD START A NEW PAGE 

oc 

4D 

33 


PG 


oc 

4E 

OF 


0 


oc 

4F 

21 

READY# 

LXIH 

/SET THE BLOCK # TO 01 

oc 

50 

2C 


TUO IH 1 


oc 

51 

18 


0 


oc 

52 

36 


H VIH 


oc 

53 

B1 


261 

/SET TEN THOU OJNITS OF BLK. #) TO 1. 

oc 

54 

23 


INXH 


oc 

55 

36 


MVIH 


oc 

56 

BO 


260 

/SET HUN. THOU. < TEN S OF BLK #> TO 0. 

oc 

57 

CD 


CALL 


oc 

58 

08 


LINEI 

/SET THE LINE COUNTER TO 000 1 

oc 

59 

06 


( 


oc 

5A 

3A 


LDA 


oc 

5B 

3D 


HORT 


oc 

5C 

18 


0 


oc 

SD 

FE 


CPI 


oc 

SE 

4D 


*N* 

/IS THE PROGRAM IN MEMORY 7 

oc 

5F 

C8 


RZ 

/YES DON 'T TYPE OUT MULTIPLE R'S 

oc 

60 

CD 

NOR# 

CALL 


oc 

61 

39 


CRLF 

/TYPE A CR# LF 

oc 

62 

02 


0 


oc 

63 

21 


LXIH 


oc 

64 

8 E 


RDY 

/THEN TYPE "R 7* 

oc 

65 

1 1 


0 


oc 

66 

CD 


CALL 


oc 

67 

7A 


TOUT 


oc 

68 

05 


0 


oc 

69 

CD 

MORI# 

CALL 

/GET AN INPUT CHAR. FROM A TTY OR CRT 

oc 

6A 

06 


10ECH0 


oc 

6B 

18 


t 


oc 

6C 

FE 


CPI 


oc 

6D 

03 


CTRLC 

/CTRL-CT 

oc 

6E 

CA 


JZ 

/YES# GO BACK TO THE COMM AND DECODER 

oc 

6F 

EF 


NOGOOD 


oc 

70 

03 


0 


oc 

71 

FE 


CPI 


oc 

72 

00 


000 

/THERE MIGHT B£ TRAILER IN THE READER 

oc 

73 

CA 


JZ 

/FROM THE PREVIOUS PASS# SO UMORE IT 
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oc 

74 

69 


MORI 

/CONLY IF YOU USE A TTY WILL THIS BE TRUE) 

oc 

75 

OC 


0 


oc 

76 

F E 


CPI 


oc 

77 

52 


-R- 

/R • READ OR READY 

oc 

78 

C2 


JNZ 


oc 

79 

60 


NOR 

/VASN'T A 000 OR AN Ri TRY AGAIN 

oc 

7A 

OC 


0 


oc 

7B 

2A 

RELXNE» 

LHLD 


oc 

7C 

22 


TXTBUF 


oc 

7D 

18 


0 


oc 

7E 

CD 

RDRMOIU 

CALL 


oc 

7F 

OC 


IOR 

/I-O DEVI CE/ READER TYPE 

oc 

SO 

18 


0 


oc 

81 

FE 


CPI 


oc 

82 

03 


CTRLC 


oc 

83 

C2 


JNZ 

/A CNTRL-C AT THE END OF A TAPE RESETS 

oc 

84 

A5 


NOTCC 

/THE LINE COINTER FOR ERROR MESSAGES. 

oc 

85 

OC 


0 


oc 

86 

E5 


PUSHH 

/SAVE THE 1 LINE STORAGE POINTER 

oc 

87 

CD 


CALL 


oc 

88 

08 


LINEI 

/SET THE LINE CO IN TER TO 000 1 

oc 

89 

06 


• 


oc 

8A 

21 


LXIH 

/NOV INCRETI ENT THE BLOCH CO IN TER 

oc 

8B 

2C 


THOU» 1 


oc 

8C 

18 


0 


oc 

8D 

OE 


NVIC 

/2 DIGIT BLOCH NINBER 

oc 

SE 

02 


002 


oc 

8F 

CD 


CALL 

/NOV INCREMENT THE NUMBER 

oc 

90 

F9 


NXTNBM 


oc 

91 

05 


0 


oc 

92 

E1 


POPH 

/RECOVER THE STORAGE POINTER 

oc 

93 

AF 


XRAA 

/NEW PAPER TAPE BLOCH/ RESET 

oc 

94 

32 


STA 

/THE PAGE NUMBER 

oc 

95 

47 


PAGNMB 


oc 

96 

18 


0 


oc 

97 

3A 


LDA 

/NOV SEE IF VE SHOULD START A 

oc 

98 

42 


PASS 

/NEV PAGE. VE SHOULD ONLY ON 

oc 

99 

18 


0 

/THE THIRD PASS. 

oc 

9A 

FE 


CPI 


oc 

9B 

4C 


*L* 

/L-LISTING/ PASS 3 

oc 

9C 

C2 


JNZ 


oc 

9D 

A2 


NOPAGE 

/NOT PASS3/ DON 'T ADVAWCE THE PAPER 

oc 

9E 

OC 


0 


oc 

9F 

CD 


CALL 

/OH/ FINISH UP THE 

oc 

AO 

FD 


FIN PAG 

/CURRENT PAGE 

oc 

Al 

OE 


0 


oc 

A2 

C3 

NO PAG E# 

JHP 


oc 

A3 

7E 


RDRMOR 

/AND GET THE NEXT PAPER TAPE CHARACTER 

oc 

A4 

OC 


0 


oc 

A5 

FE 

NOTCC# 

CPI 


oc 

A6 

00 


000 

/7BIT LDR 

oc 

A7 

CA 


JZ 


oc 

A8 

7E 


RDRMOR 


oc 

A9 

OC 


0 
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OC 

AA 

FE 

CPI 


oc 

AB 

7F 

177 

/7 BIT RUBOUT 

oc 

AC 

CA 

JZ 


oc 

AD 

7E 

RDRMOR 


oc 

AE 

OC 

0 


oc 

A T 

FE 

CPI 


oc 

BO 

24 

044 

/THE DOLLAR SIGN TERMINATES INPUT 

oc 

B1 

CA 

JZ 


oc 

B8 

CI 

BODTXT 


oc 

B3 

OC 

0 


oc 

B4 

FE 

CPI 


oc 

BS 

OA 

LF 

/LINE FEED? 

oc 

B6 

CA 

JZ 

/YES» THEN IGNORE IT AND GET 

oc 

B7 

7E 

RDRMOR 

/ANOTHER TAPE CHARACTER 

oc 

BS 

OC 

0 


oc 

B9 

77 

MOVMA 

/SAVE THE CHARACTER IN MEMORY 

oc 

BA 

FE 

CPI 


oc 

BB 

OD 

CR 

/VAS IT A CRT» YES. THEN ITS THE 

oc 

BC 

C6 

RZ 

/END OF 1 LINE» NOV INTERPRETE IT. 

oc 

BD 

23 

INXH 

/NONE OF THE ABO VE» IN CREMINI HAL 

oc 

BE 

C3 

JMP 

/AND THEN READ ANOTHER CHARACTER 

oc 

BF 

7E 

RDRMOR 


oc 

CO 

OC 

0 


oc 

CI 

36 

ENDTXT» MVIM 

/END OF THE PAPER TAPE 

oc 

C2 

9B 

BTERM 

/SO SAVE A 233 TERMINATOR AT THE 

oc 

C3 

C9 

RET 

/END OF THE LINE AND RETUIM 




/THIS ROUTINE INTERPRETES THE TVO ADDRESS 




/BYTES SEPARATED BY A SPACE VHIN HE HAVE 




/A DEFINED ADDRESS VITH A * OR WHEN VE 




/USE THE PSEUDO 

-OP *DV. 

oc 

C4 

CD 

ADBYTE» CALL 


oc 

C5 

27 

THRNHB 

/calcilate THE HI ADDRESS 

oc 

C6 

OD 

0 


oc 

C7 

CA 

JZ 

/NOT A VALI D NU4BER» SO 

oc 

C8 

06 

NOGOAD 

/PR1NT AN ERROR MESSAGE 

oc 

C9 

OD 

0 


oc 

CA 

59 

MOVEC 

/SAVE THE HI ADDRESS IN *E" 

oc 

CB 

23 

INXH 

/INCREMENT THE TEXT BUFFER POINTER 

oc 

CC 

7E 

MOVAM 

/CHECK FOR A SPACE SEPARATING THE #*S 

oc 

CD 

FE 

CPI 


oc 

CE 

20 

040 

/2 #*S» HAL» SEPARATED BY A SPACE 

oc 

CF 

C2 

JNZ 


oc 

DO 

06 

NOGOAD 

/THERE VAS NO SPACE» 

oc 

DI 

OD 

0 

/SO PRINT AN ERROR MESSAGE 

oc 

D2 

CD 

CALL 


oc 

D3 

27 

THT9JMB 

/THERE VAS A SPACE» CALCULATE THE LO ADD. 

oc 

D4 

OD 

0 


oc 

D5 

CA 

JZ 


oc 

D6 

06 

NOGOÀD 

/NOT A VALID #» SO PRINT AN ERROR MESSAGE 

oc 

D7 

OD 

0 


oc 

DS 

53 

MOVDE 

/SAVE THE HI ADDRESS IN "D* 

oc 

D9 

59 

MOVEC 

/SAVE THE LO ADDRESS IN "E" 
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oc 

DA 

EB 


XCHG 

/PUT THE CALCULATED ADDRESS INTO HAL 

oc 

DB 

C9 


RET 

/AND RETlim VITH IT IN H4L 

oc 

DC 

CD 

ADDOK* 

CALL 

/CALCULATE THE ADDRESS 

oc 

DD 

C4 


ADBYTE 


oc 

DE 

OC 


0 


oc 

DE 

3E 

F1MADD* 

N VI A 

/AN ADDRESS HAS BEEN DEFIN ED. SO 

oc 

EO 

FF 


377 

/SET THE "ADDRESS INDI CATOR REGI STER' 

oc 

E 1 

32 


STA 

/377. 

oc 

E2 

16 


ADCHK 


oc 

E3 

18 


0 


oc 

E4 

22 


SHLD 

/AND THEN SAVE THE ADDRESS IN THE 

oc 

ES 

34 


ADDCNT 

/"CURRENT ADDRESS COIMTER* 

oc 

E6 

18 


0 


oc 

ET 

EB 


XCHG 

/PUT THE CURRENT ADDRESS IN DAE 

oc 

ES 

3A 


LDA 

/DETERMINE VHICH PASS THIS IS 

oc 

E9 

42 


PASS 


oc 

EA 

18 


0 


oc 

EB 

FE 


CP1 


oc 

EC 

50 


*p* 

/P-PUNCH-PASS2. PUNCHING A TAPE 

oc 

ED 

C2 


JNZ 

/NOT PASS2. ITS PASS 1 OR 3 

oc 

EE 

F6 


NTADD 


oc 

EF 

OC 


0 


oc 

FO 

CD 


CALL 

/1TS PASS 2. PUNCH THE ADDRESS 

oc 

FI 

17 


TAPADD 

/1DENTIFIER (CHANNEL 7) ON THE TAPE 

oc 

F2 

OD 


0 

/AND THE CURRENT ADDRESS 

oc 

F3 

C3 


JHP 


oc 

FA 

01 


IO DON E 

/THEN FIN D THE NEXT LINE OF TEXT 

oc 

F5 

OD 


0 


oc 

F6 

FE 

N TADD* 

CPI 


oc 

F7 

4C 


"L" 

/L-LIST-PASS 3 

oc 

F8 

C2 


JNZ 


oc 

F9 

01 


IO DON E 

/NOT PASS 3. MUST BE PASS 1. KEEP GO! 

oc 

FA 

OD 


t 


oc 

FB 

CD 


CALL 

/ITS PASS 3. TYPE SOME SPACES 

oc 

FC 

1B 


SPCIT 


oc 

FD 

10 


0 


oc 

FE 

CD 


CALL 

/THEN TYPE THE ADDRESS 

oc 

FF 

23 


SPECL 


OD 

00 

OC 


0 


OD 

01 

06 

IODONEJ 

M VI B 

/NOV FIND THE NEXT LINE OF TEXT 

OD 

02 

00 


000 


OD 

03 

C3 


JMP 


OD 

04 

A5 


FINDCR 


OD 

OS 

OD 


0 


OD 

06 

CD 

NOGOAD* 

CALL 


OD 

07 

OE 


woirr 

/TYPE "BN" ERROR MESSAGE 

OD 

OS 

OD 


0 


OD 

09 

2E 


MV1L 


OD 

OA 

00 


000 

/SET THE HAL ADDRESS TO 000 000 

OD 

OB 

26 


MVIH 


OD 

OC 

00 


000 


OD 

OD 

C9 


RET 

/AND THEN RETUIM FROM "ADBYTE" 
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OD 

OE 

£5 

BNOUT# 

PUSHH 


OD 

OF 

21 


LXI H 

/THIS IS TO TYPE THE "BN" 

OD 

10 

6F 


BN 

/(BAD NUMBER) ERROR MESSAGE 

OD 

11 

1 1 


0 


OD 

12 

CD 


CALI¬ 

/TYPE "BN" PLUS THE LINE NUMBER 

OD 

13 

OE 


LI STI 

/UHERE THE ERROR OCCURRED. 

OD 

14 

OF 


0 


OD 

15 

E1 


POPH 

/GET THE POINTER BACK 

OD 

16 

C9 


RET 


OD 

17 

3E 

TAPADD# 

M VI A 

/PUNCH CHANNEL 7 FOR THE ADDRESS 

OD 

18 

40 


100 

/1 DENTI TI ER (FLAG) 

OD 

19 

CD 


CALL 


OD 

1A 

09 


10P 

/I-O DEVI CE# PUNCH TYPE 

OD 

1B 

18 


0 


OD 

1C 

2A 


LHLD 

/THEN GET THE CON TENTS OF THE 

OD 

1D 

34 


ADDCNT 

/"CURRENT ADDRESS CO IN TER" 

OD 

1E 

18 


0 


OD 

ir 

7C 

RADD1# 

HOVAH 

/AND PUNCH THE ADDRESS OUT 

OD 

20 

CD 


CALL 

/ON THE TAPE AS A FRAMES 

OD 

21 

E4 


BYTE1 


OD 

22 

OF 


0 


OD 

23 

7D 


MOVAL 


OD 

24 

C3 


JMP 


OD 

25 

E4 


BYTE1 


OD 

26 

OF 


0 
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/THIS SUBROUTINE CON VERTS THE ASCII CMARACTERS STO RED 
/IN THE TECT BUFFER TO EIGHT-BIT NUV^JSS. EITHER 
/OCTAL OR HEXADECIHAL NUMBERS CAN Rii C0NVERTED. 

/AFTER THE CALI- TO 'THIWMB*. A JZ TO AH ERROR 
/ROUTINE CAN BE PERFORIEO. WHICH HEANS THAT THE 
/N UH BER COULD NOT BE PROPERLY CONVERTED. 


OD 

27 

22 

THFNMB* 

SHLD 

/SAVE THE TECT BUFFER POINTER 

OD 

28 

26 


TMP 

/THAT ADDRESSES THE FIRST DIGIT. 

OD 

29 

18 


e 


OD 

2A 

16 


N VI D 


OD 

2B 

02 


002 

/2 HEX DIGITS PER 8 BIT WORD 

OD 

2C 

AF 


XRAA 


OD 

2D 

4F 


HOVCA 

/THE RESULT VILL BE SAVED IN C. 

OD 

2E 

23 

CONVHXa 

INXH 


OD 

2F 

7E 


MOVA* 

/GET A CHARACTER 

OD 

30 

FE 


CPI 


OD 

31 

30 


*0" 


OD 

32 

DA 


JC 

/1TS NOT HBC# 1S IT OCTAL 7 

OD 

33 

60 


TRYOCT 


OD 

34 

OD 


0 


OD 

35 

FE 


CPI 

/LESS THAN ASCII |7 

OD 

36 

3A 


*» * 


OD 

37 

DA 


JC 


OD 

38 

46 


HEXNMB 

/OK. I TS 0-9. CONVERT IT 

OD 

39 

OD 


0 


OD 

3A 

FE 


CPI 


OD 

3B 

41 


*A“ 

/LESS THAN ASCII ’A* 7 

OD 

3C 

DA 


JC 


OD 

30 

60 


TRYOCT 

/SEE IT ITS OCTAL INSTEAD 

OD 

3E 

OD 


0 


OD 

3F 

FE 


CPI 


OD 

40 

47 


-G- 

/F IS THE HIGHEST VALID HEX CHARACTER 

OD 

41 

D2 


JNC 


OD 

42 

60 


TRYOCT 

/TRY INTERPRETINO IT AS OCTAL 

OD 

43 

OD 


« 


OD 

44 

C6 


ADI 

/TO GET HERE. ITS A-F 

OD 

45 

09 


OH 


OD 

46 

E6 

HEXNMEa 

ANI 

/SAVE THE FOUR LSBS 

OD 

47 

OF 


017 


OD 

48 

47 


HO VBA 

/SAVE THE VALUE IN B 

OD 

49 

79 


HOVAC 

/GET THE PREV10US RESULT 

OD 

4A 

07 


RLC 

/HULTIPLY IT BY 16 

OD 

4B 

07 


RLC 


OD 

4C 

07 


RLC 


OD 

4D 

07 


RLC 


OD 

4E 

80 


ADDB 

/ADD THE VALUE (DIGIT) JUST POUND 

OD 

4F 

4F 


HOVCA 

/SAVE THE RESULT 

OD 

50 

15 


DCRD 

/2 DIGITS YET 7 

OD 

51 

C2 


JNZ 

/NO. CONVERT ANOTHER ONE 

OD 

52 

2E 


CON VHX 


OD 

53 

OD 


0 


OD 

54 

23 


INXH 

/YES. SEE 1F THERE IS AN *H* 
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OD 

55 

7E 


MOV AM 

/AFTER THE TVO DIGIT HEX NUMBER 

OD 

56 

FÉ 


CP1 


OD 

57 

48 


*H* 

/H AFTER THE 2 DIGITS 7 

OD 

55 

C2 


JMZ 


OD 

59 

60 


TRYOCT 

/NO *H** 1S IT OCTAL 7 

OD 

5A 

OD 


0 


OD 

SB 

23 


INXH 

/INCREMENT PAST THE H 

OD 

5C 

7E 


MOVAM 

/THIS MUST BE A TERMINATOR 

OD 

5D 

C3 


JMP 


OD 

5E 

82 


NONMB 


OD 

5 r 

OD 


0 


OD 

60 

2A 

TRYOCT# 

LHLD 

/GET THE TEXT BUFFER POINTER 

OD 

61 

26 


TMP 

/THAT POINTS TO THE STRING 

OD 

62 

18 


0 

/OF CHARACTERS 

OD 

63 

16 


M VI D 


OD 

64 

03 


003 

/DIGIT COUNTER 

OD 

65 

AF 


XRAA 


OD 

66 

4F 


MOVCA 


OD 

67 

23 

NXTNMB# 

INXH 

/FIRST VE BILL TRY TO CONVERT THE 

OD 

68 

7E 


MOVAM 

/NUHBERS ASSUMING OCTAL DIGITS 

OD 

69 

FE 


CPI 


OD 

6A 

30 


-o* 


OD 

6B 

DA 


JC 


OD 

6C 

82 


NONMB 

/OK* SEE 1F THERE'S A VALI D TERMINATOR 

OD 

6D 

OD 


0 


OD 

6E 

FE 


CPI 


OD 

6F 

38 


*8* 


OD 

70 

D2 


JNC 


OD 

71 

82 


NONMB 

/OK* SEE ir THERE'S A VAL ID TERMINATOR 

OC 

72 

OD 


0 


OD 

73 

E6 


ANI 

/1TS AN OCTAL NUMBER* SAVE THE 

OD 

74 

07 


007 

/THREE LSBS 

OD 

75 

47 


MOVBA 

/SAVE THE VALUE 

OD 

76 

79 


MOVAC 

/GET THE PREVIOUS VALUE 

OD 

77 

07 


RLC 

/HULT1PLY IT BY 8 

OD 

78 

07 


RLC 


OD 

79 

07 


RLC 


OD 

7A 

80 


ADDB 

/ADD THE VALUE JUST ZNTERED 

OD 

7B 

4F 


MOVCA 

/AND SAVE THE RESULT 

OD 

7C 

15 


DCRD 

/DECREMENT THE DIGIT COUNT 

OD 

7D 

C2 


JNZ 

/ir ITS NOT ZERO* GET ANOTHER 

OD 

7E 

67 


NXTNMB 

/CHARACTER 

OD 

7 r 

OD 


0 


OD 

80 

23 


INXH 

/VE HAD THREE DIGITS* SEE IF 

OD 

81 

7E 


MOVAM 

/THERE'S A TEJWINATOR AFTER THEM 

OD 

82 

2B 

NON MB* 

DCXK 


OD 

83 

FE 


CPI 

/IS THERE A SPACE AFTER THE #7 

OD 

84 

20 


040 


OD 

85 

CA 


JZ . 

/YES» ÌT'S A VAL 1 D TERMINATOR 

OD 

86 

97 


N0A1 


OD 

87 

OD 


0 


OD 

88 

FE 


CPI 

/IS THERE A CARRI AG E RETUIM 

OD 

89 

OD 


CR 

/AFTER THE NUMBER7 
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OD 

SA 

CA 


JZ 

/YES, THATS A VALI D TEIWINATOR 

OD 

8B 

97 


M0A1 


OD 

8C 

OD 


8 


OD 

8D 

r e 


CP1 

/IS THERE A LINE FEED OR TAB 

OD 

8E 

OA 


LF 

/AFTER THE NUHBERT 

OD 

87 

DA 


JC 

/ YES# THEY ARE VAL I D TERMINATORS 

OD 

90 

97 


NOAI 


OD 

91 

OD 


0 


OD 

92 

FÉ 


CPI 

/IS THERE A SLA SU (/I FOR A COMMENTI 

OD 

93 

2F 


0 57 

/ATTER THE NTJHBERT 

OD 

94 

C2 


JNE 

/HO, THEN IT IS NOT TERHINATED 

OD 

95 

9B 


BAENMB 

/PROPERLY. 1TS A BAD NUHBER 

OD 

96 

OD 


0 


OD 

97 

7A 

N0A1# 

MOVAD 

/TERMINATED OK. ANY OS ENTEREDT 

OD 

98 

FE 


CPI 


OD 

99 

03 


003 


OD 

9A 

C9 


RET 


OD 

9B 

AF 

BAENNB* 

XRAA 

/VE HAD AN ERROR 

OD 

9C 

4F 


HOVCA 

/CLEAR "C* TO 000 

OD 

9D 

FE 


CPI 


OD 

9E 

00 


000 

/SET THE ZERO FLAG 

OD 

9F 

C9 


RET 
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/THE B REGI STER IS USED TO SIN SE VHETHER OR NOT 
/TO INCREM ENT 'ADDCNT' THE CURRINT ADDRESS CO IN TER 
/ANO IN CREN ENT THE *LINCNT* USED POR ERROR MESSAGES. 
/'LINCNT' 1S ALVAYS IN C REM IN TED. BUT ir A LINE 
/OT TEXT 00ES NOT CONTAIN DATA OR A KNEMONIC. 





/B VILE 

- 000. 

AND ’ADDOIT* VILL NOT BE INCREMENTED. 

OD 

AO 

CS 

CRIO» 

PUSHB 

/SAVE THE 'B' FLAO 

OD 

Al 

CD 


CALE 

/CHECK THE PASS #. AND 1F ITS 2 OR 3 

OD 

AG 

12 


IOCHK 

/PIMCH OR LIST THE PROGRAM 

OD 

A3 

OC 


0 

/C'IOCHK' - 1-0 CHECK) 

OD 

A4 

CI 


POPB 

/GET THE 'B' FLAG BACK 

OD 

A3 

78 

FIN DCRj 

HOVAB 


OD 

A6 

FÉ 


CPI 

/ INCREM ENT THE ADDRESS AND LINE COIHT 7 

OD 

A7 

00 


000 


OD 

A8 

CA 


JZ 

/JUST INCREMENT THE LINE COIMT 

OD 

A9 

C7 


NODATA 

/ C USED FOR THE ERROR MESSAGES) 

OD 

AA 

OD 


0 


OD 

AB 

3A 

ADDINO. 

LDA 

/VHAT PASS IS THIS? 

OD 

AC 

42 


PASS 


OD 

AD 

18 


0 


OD 

AE 

FE 


CPI 

/PASS 17 

OD 

AF 

FF 


377 


OD 

BO 

CA 


JZ 

/YES. THEN SIHPLY INCREM ENT THE ADDRESS 

OD 

B 1 

CO 


AD20R3 

/CADDCNT) AND LINE COIMT (LINCNT). 

OD 

B2 

OD 


0 


OD 

B3 

3A 


LDA 

/ITS PASS 2 OR 3. GET THE ADDRESS 

OD 

B4 

16 


ADCHK 

/SET REGI STER. 

OD 

B5 

18 


0 


OD 

B6 

B7 


ORAA 

/ZERO OR NON-ZERO 7 

OD 

B7 

C2 


JNZ 

/OK. AN ADDRESS MAS SET BY AN * 

OD 

B8 

CO 


AD20R3 

/SO ITS OK TO INCREM ENT THE 

OD 

B9 

OD 


0 

/ADDRESS IN ADDCMT. 

OD 

BA 

21 


LX1H 

/VE CAN'T IN CREMEN T AN ADDRESS THAT 

OD 

BB 

78 


NO ADR 

/VE DO NOT HAVE. SO PRINT 

OD 

BC 

11 


0 

/AN ERROR HESSAGE *NA AT LINE #.' 

OD 

BD 

C3 


JHP 

/THIS IS A FATAL ERROR. 

OD 

BE 

26 


FATAL 


OD 

b r 

OB 


0 


OD 

co 

2A 

AD20R3. 

LHLD 


OD 

CI 

34 


ADDCNT 

/GET. INCREM ENT BY 1 AN D STORE 

OD 

C2 

18 


0 

/THE -CURRENT ADDRESS COUNTER' 

OD 

C3 

23 


INXH 


OD 

C4 

22 


SHLD 


OD 

C5 

34 


ADDCNT 


OD 

C6 

18 


0 


OD 

C7 

CD 

NO DATA. 

C ALL 


OD 

C8 

F4 


LINC 

/IN CREN OC T THE DECIHAL LINE # 

OD 

C9 

05 


0 

/BY 1. 

OD 

CA 

3A 

0K1NC. 

LDA 

/IF VE ARE ASSEMBLING THE SOURCE 

OD 

CB 

3D 


NORT 

/FROM TAPE. VE SHOULD NOV GET 

OD 

CC 

18 


0 

/THE NEXT LINE OF SOURCE. 

OD 

CD 

FE 


CPI 
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OD 

CE 

54 


•T* 



OD 

CF 

CA 


JZ 

/SOURCE 1S FROH TAPE# GET 


OD 

DO 

E2 


READI T 

/THE NEXT LINE 


OD 

DI 

OD 


0 



OD 

D2 

2A 


LHLD 

/IT IS NOT FROH TAPE# SO F1ND 


OD 

D3 

2E 


TFCLIN 

/THE BEG1NMING OF THE NEXT LINE 


OD 

D4 

18 


0 

/OT TEXT 5T0RED IN MEMORY. 


OD 

DS 

7E 

NCRYET. 

MOV AH 

/GET A TEXT CHARACTER 


OD 

D6 

23 


INXH 



OD 

D7 

FE 


CPI 

/IS IT THE CR AT THE END OF THE 

LINE ? 

OD 

D8 

OD 


CR 



OD 

D9 

C2 


JNZ 

/NO» KEEP LOOKING FOR THE CR 


OD 

DA 

D5 


NCRYET 



OD 

DB 

OD 


0 



OD 

DC 

22 

SETTFC# 

SHLD 

/YES» SAVE THE ADDRESS OF THE FIRST 

OD 

DD 

2E 


TFCLIN 

/CHARACTER IN THE NEXT LINE. 


OD 

DE 

18 


0 



OD 

DF 

06 


MVIB 

/RESET THE FLA6 REGI STER TO 0 


OD 

E0 

00 


000 



OD 

E1 

C9 


RET 



OD 

E2 

CD 

READI T# 

CALL 

/SOURCE BEING ASSEMBLEO IS FROM 

TAPE 

OD 

E3 

7B 


R CLINE 

/SO READ THE NEXT LINE OF TEXT 


OD 

E4 

OC 


0 



OD 

ES 

2A 


LHLD 

/H«L POINT TO THE BEG1NNIN G 


OD 

E6 

22 


TXTBUF 

/OF THE LINE 


OD 

E7 

18 


0 



OD 

E8 

C3 


JMP 

/SO SAVE H*L IN “TFCLIN* 


OD 

E9 

DC 


SETTFC 



OD 

EA 

OD 


0 




/VHEN ITS TIME AT THE END OF THE THIRD PASS TO PRINT 
/OUT THE CONTENTS OF THE SYMBOL TABLE# VE COME HERE. 
/FIRST# THE SYMBOLIC ADDRESSES ARE SORTED US1NG A 
/BUBBLE SORT ALGORITHM. THEN THE SYMBOLIC ADDRESSES 
/ARE PRINTED IN FOUR COLUMNS» ALONG V1TH THEIR ASSI GN ED 
/ADDRESSES. 


OD 

EB 

3E 

SYMOUT# 

M VI A 


OD 

EC 

04 


004 

/# OF COLUMNS 

OD 

ED 

32 


STA 


OD 

EE 

36 


MNEVAL 

/“MNEVAL* IS JUST USED 

OD 

EF 

18 


0 

/AS A STORAGE LOCATION (TEMPORARY) 

OD 

F 0 

CD 


CALL 

/FINISH UP THE CURRENT PAGE 

OD 

FI 

FD 


FIN PAG 

/BY TYPING ENOUGH CR'S «NO 

OD 

F2 

0E 


0 

/LF'S TO GET TO THE NEXT PAGE 

OD 

F3 

3E 

SORT# 

M VI A 

/SET THE “EXCHANGE INDI CATOR* TO 

OD 

F4 

FF 


377 

/377. 

OD 

F5 

32 


STA 

/SAVE THE EXCHANGE INDI CATOR. 

OD 

F6 

26 


TMP 

/ir «N EXCHANGE TAKES PLACE# THIS 

OD 

F7 

18 


0 

/NUMBER IS SET TO ZERO* 

OD 

F8 

2A 


LHLD 

/LOAD H4L VITH THE STARTING ADDRESS 

OD 

F9 

39 


SYMADD 

/OF THE SYMBOLIC ADDRESS TABLE. 

OD 

FA 

18 


0 
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(D 

FB 

CD 


C ALL 

/CALL THE BUBBLE SORT SUBROUTINE. 

SD 

re 

5F 


BSORT 


OD 

FD 

OE 


0 


OD 

FÉ 

3A 


LDA 

/GET THE EXCHANGE INDICATOR 

OD 

FF 

26 


TMP 


OE 

OS 

18 


0 


OE 

01 

F E 


CPI 

/ANY EXCHANGES TAKE PLACE? 

OE 

02 

FF 


377 


OE 

03 

C2 


JNZ 

/YES. THEN MAX E ANOTHER PASS THROUGH 

OE 

04 

F3 


SORT 

/THE SYMBOLIC ADDRESS TABLE VITH 

OE 

05 

OD 


0 

/THE “BSORT" SUBROUTINE. 

OE 

06 

2A 


LHLD 

/TEH TABLE IS SORT ED. GET ITS 

OE 

07 

39 


SYMADD 

/START IN G ADDRESS. 

OE 

08 

18 


0 


OE 

09 

16 

NOCRY# 

M VI D 

/A MAXIMUM OF EIGHT CHARACTERS CfM 

OE 

SA 

08 


0 10 

/BE PRINTED. 

OE 

OB 

7E 

TYPSYW, 

HO VAM 

/GET A CHARACTER FROM THE TABLE. 

OE 

OC 

FÉ 


CPI 

/IS IT THE EQUAL SI91 STORED AT THE 

OE 

SD 

3D 


075 

/END OF EVERY SYMBOL? 

OE 

OE 

CA 


JZ 

/YES. THEN PRINT IT, FOLLOVED BY 

OE 

OF 

2B 


TYPEO 

/A 16-BIT OCTAL OR HEX ADDRESS 

OE 

10 

OE 


0 


OE 

1 1 

FE 


CPI 

/REACHED THE END OF THE TABLE? 

OE 

12 

9B 


BTERM 


OE 

13 

CA 


JZ 

/YES. THEN PRINT THE NUMBER OF ERRORS 

OE 

14 

ES 


LASTPG 

/FROM THE THIRD PASS. AND ENOUGH CARRIAGE 

OE 

15 

OE 


0 

/RETUJWS AND LINE FEEDS TO FINISH THE PAGE. 

OE 

16 

15 


DCRD 

/PRINTED EIGHT CHARACTERS YET? 

OE 

17 

CA 


JZ 

/YES. VE HAVE. MOV FINO THE ■ 

OE 

18 

21 


NOEQY 

/ SI 91 AND THEN PRINT THE 

OE 

19 

OE 


0 

/16-BIT ADDRESS. 

OE 

1A 

CD 


C ALL 

/PRINT THE CHARACTER READ 

OE 

IB 

OF 


100 

/FROM THE TABLE 

OE 

IC 

18 


0 


OE 

ID 

23 


INXH 

/INCREHENT THE TABLE ADDRESS 

OE 

1E 

C3 


JMP 

/AND READ THE N EXT CHARACTER. 

OE 

1F 

OB 


TYPSYM 


OE 

20 

OE 


0 


OE 

21 

7E 

NOEQY* 

MO VAM 

/THERE ARE OVER 8 CHARACTERS IN THE 

OE 

22 

FE 


CPI 

/SYMBOL, SO VE ONLY TYPE THE FIRST 

OE 

23 

3D 


075 

/S AND THEN FINO THE ADDRESS 

OE 

24 

CA 


JZ 

/VE FIRST FIND THE • BEFORE THE ADDRESS 

OE 

25 

32 


E» UT 


OE 

26 

OE 


0 


OE 

27 

23 


INXH 

/KEEP LOOK1NG FOR THE - 

OE 

28 

C3 


JMP 


OE 

29 

21 


NOEOY 

/NO » SI 91 YET 

OE 

2A 

OE 


0 


OE 

2B 

3E 

TYPEQ# 

MVIA • 

/PRINTED THE ». SO PRINT A SPACE. 

OE 

2C 

AO 


240 


OE 

2D 

4A 


MOVCD 

/THEN PRINT THE NUMBER OF SPACES 

OE 

2E 

OD 


DCRC 

/SPECI FI ED BY THE C REGI STER. 

OE 

2F 

C4 


CNZ 
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0E 

30 

68 


SIXSPC+4 

0E 

31 

OF 


0 


DE 

32 

7 E 

EOUT. 

MOVAM 

/NOV GET THE • AND PRINT IT. 

OE 

33 

CD 


CALL 


OE 

34 

OF 


100 

/1-0 DEVI CE# OUTPUT TYPE 

OE 

35 

18 


0 


OE 

36 

23 


INXH 


OE 

37 

SE 


MOVEM 

/GET THE LO ADDRESS 

OE 

38 

23 


INXH 


OE 

39 

7E 


MOVAM 

/THEN THE HI ADDRESS 

OE 

3A 

23 


INXH 


OE 

3B 

CD 


CALL 


OE 

3C 

B2 


OCTOUT 

/PRINT THE HI ADDRESS 

OE 

3D 

OS 


0 


OE 

3E 

7B 


MOVAE 

/PUT THE LO ADDRESS IN "A" 

OE 

3F 

CD 


CALL 


OE 

40 

B2 


OCTOUT 

/THEN PRINT IT OUT ALSO 

OE 

41 

05 


0 


OE- 

42 

3E 


M VI A 

/A COUPLE OF SPACES TO THE N EXT SYMBOL 

OE 

43 

AO 


240 


OE 

44 

CD 


CALL 


OE 

45 

or 


100 

/I-O DEVI CE. OUTPUT TYPE 

OE 

46 

18 


0 


OE 

47 

3A 


LDA 


OE 

48 

36 


MNEVAL 

/GET THE -COLUKN CO IN TER' < VE HAVE 

OE 

49 

18 


9 

/ 4 COULMNS OF SYMBOLIC ADDRESSES 

OE 

4A 

3D 


OCRA 

/ACROSS A PAGE). 4 COLUHNS YET 7 

OE 

4B 

32 


STA 


OE 

4C 

36 


MN E VAL 


OE 

4D 

18 


0 


OE 

4E 

C2 


JNZ 

/NO. TYPE ANOTHER SYMBOL 

OE 

4F 

09 


NOCRY 


OE 

50 

OE 


0 


OE 

51 

3E 


M VI A 

/YES. RESET THE COLUMN CO IN TER 

OE 

52 

04 


004 


OE 

53 

32 


STA 


OE 

54 

36 


MNEVAL 


OE 

55 

18 


9 


OE 

56 

CD 


CALL 

/THEN PRINT A CR A LF 

OE 

57 

39 


CRLF 


OE 

58 

02 


0 


OE 

59 

CD 


CALL 


OE 

5A 

33 


PG 

/CHECK THE NUMBER OF LINES 

OE 

5B 

OF 


0 

/ON THIS PAGE SO FAR 

OE 

5C 

C3 


JMP 


OE 

5D 

09 


NOCRY 


OE 

5E 

OE 


0 


OE 

5F 

22 

BSORT. 

SKLD 

/SAVE THE STARTING ADDRESS OF 

OE 

60 

34 


ADDCNT 

/THE SYMBOLIC ADDRESS TABLE 

OE 

61 

18 


0 


OE 

62 

FE 


CPI 

/ARE VE AT THE END OF THE TABLE» 

OE 

63 

9B 


BTERM 


OE 

64 

C8 


RZ 

/YES. THEN RETUIN. NO SYMBOLS. 
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0E 

65 

23 

B SORTI# 

INXH 

/ INCREMENT THE ADDRESS BY ONE. 

0E 

66 

7E 


HOVAM 

/GET A CHARACTER 

0E 

67 

FE 


CPI 

/FOUND THE EQUAL SIGN AT THE END 

0 E 

68 

3D 


" m m 

/OF THE SYMBOL YET? 

0E 

69 

C2 


JN Z 

/NO# THEN KEEP LOOKING 

0E 

6A 

65 


BSORTI 


OE 

6B 

OE 


0 


OE 

6C 

23 


INXH 

/FOWD IT# INCREMENT PAST THE I6-BIT 

OE 

6D 

23 


INXH 

/ADDRESS TO THE FIRST CHARACTER OF THE 

OE 

6E 

23 


INXH 

/SECOND SYMBOL 1C ADDRESS. 

OE 

6F 

7E 


MOVAH 

/DOES THE SECOND SYMBOLIC ADDRESS 

OE 

70 

FE 


CPI 

/EXIST? 

OE 

7 1 

9B 


BTERM 


OE 

72 

C8 


RZ 

/ONLY 1 SYMBOL# ITS “SORTED"# RETUW 

OE 

73 

2A 


LHLD 

/“GET THE ADDRESS OF THE FIRST 

OE 

74 

34 


ADDCNT 


OE 

75 

18 


0 


OE 

76 

22 

BS0RT2# 

SHLD 

/SAVE THE ADDRESS OF THE FIRST 

OE 

77 

34 


ADDCNT 


OE 

78 

18 


9 


OE 

79 

7E 

NOEQU# 

HOVAM 

/NOV FIN D THE SECOND SYMBOLIC 

OE 

7 A 

FE 


CPI 

/ADDRESS. 

OE 

7B 

9B 


BTERM 


OE 

7 C 

C8 


RZ 


OE 

7D 

23 


INXH 


OE 

7E 

FE 


CPI 


OE 

7F 

30 


m m w 


OE 

80 

C2 


JNZ 


OE 

81 

79 


NOEQU 


OE 

82 

OE 


0 


OE 

83 

23 


INXH 


OE 

84 

23 


INXH 


OE 

85 

22 


SHLD 

/OK# FOIND IT# SAVE ITS ADDRESS 

OE 

86 

32 


LINCNT 


OE 

87 

18 


0 


OE 

88 

EB 


XCHG 

/ADDRESS OF 2ND IN DAE 

OE 

89 

2A 


LHLD 


OE 

8A 

34 


ADDCNT 

/GET THE ADDRESS OF THE FIRST STRINO 

OE 

8B 

18 


0 

/BACK IN TO HAL 

OE 

8C 

EB 


XCHG 

/ l ST IN DAE# 2ND IN HAL 

OE 

8D 

1A 

NCHAR# 

LDAXD 

/GET A CHARACTER FROM THE 1 ST 

OE 

8E 

FE 


CPI 


OE 

8F 

3D 


" ■ " 

/END OF THE FIRST? 

OE 

90 

C2 


JNZ 


OE 

91 

9A 


NOTEND 


OE 

92 

OE 


1 


OE 

93 

13 


INXD 

/FOUND THE END OF THE IST# 

OE 

94 

13 


1NXD 

/GO TO THE 2ND 

OE 

95 

13 


INXD 


OE 

96 

EB 


XCHG . 


OE 

97 

C3 


JHP 


OE 

98 

76 


BS0RT2 


OE 

99 

OE 


0 
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0E 

9A 

47 

NOTINO* 

HOVBA 

/SAVE 15T IN B» SEE IF VE HAVE 

0E 

9B 

7 E 


MOVAM 

/GOT ONE OF THE »D CHARACTERS 

0E 

9C 

FE 


CPI 


OE 

9D 

9B 


BTERH 


IE 

9E 

C8 


RZ 

/YES» THEN RETUIW 

OE 

9 r 

FE 


CPX 


OE 

AO 

3D 


• a • 

/ IST » 2ND 7 

OE 

Al 

CA 


JZ 

/YES* SO EXCHANGE THEM 

OE 

A2 

BO 


SWAP 


OE 

A3 

OE 


i 


SE 

A4 

B8 


CMPB 

/COMPARE 1 ST IN B TO 2ND IN A 

SE 

AS 

DA 


JC 

/ 1 ST IS GREATER THAN AND NOT EQUAL 

OE 

A6 

BO 


SWAP 

/TO WD* SO THEY MUST BE EXCHANGED 

OE 

A7 

OE 


0 


OE 

A8 

C2 


JNZ 


OE 

A9 

CD 


FNXSYM 


OE 

AA 

OE 


0 


OE 

AB 

23 

3YHCEQ* 

INXH 

/1 ST • SUD. SO EXAMINE THENEXT 

OE 

AC 

13 


INXD 

/TVO CHARACTERS IN THE STRINGS 

OE 

AD 

C3 


JMP 


OE 

AE 

8D 


NCHAR 


OE 

AF 

SE 


0 


IE 

BO 

AF 

SWAP# 

XRAA 


OE 

B 1 

32 


STA 


IE 

B2 

26 


TNP 

/SET THE FLAQ TO INDICATE THAT A EXCHANGE 

OE 

B3 

18 


0 

/HAS TAXEN PLACE 

OE 

B4 

2A 


LHLD 

/GET THE ADDRESS OF THE FIRST 

OE 

BS 

34 


ADDCNT 

/STRING 

IE 

B6 

18 


• 


IE 

B7 

EB 


XCHG 


OE 

B8 

21 


LX1H 


OE 

B9 

A8 


BUFF2 


OE 

BA 

18 


0 


IE 

BB 

CD 


CALL 

/MOVE THE 1 ST STRING TO BUFF2 

IE 

BC 

D3 


HOVES 


OE 

BD 

• E 


0 


IE 

BE 

2A 


LHLD 

/GET THE ADDRESS FOR THE 1ST 

IE 

BF 

34 


ADDCNT 

/STRING AGAIN 

IE 

CO 

18 


0 


OE 

CI 

CD 


CALL 

/MOVE THE SECOND STRING TO VHERE 

IE 

C2 

D3 


MOVES 

/«MERE THE FIRST VAS STORED IN 

OE 

C3 

OE 


1 

/THE SYMBOL TABLE 

IE 

C4 

11 


LXID 


IE 

CS 

A8 


BUFF2 


OE 

C 6 

18 


0 


OE 

C7 

22 


SKLD 

/SAVE THE ADDRESS 

IE 

CS 

32 


LINCNT 


IE 

C9 

18 


0 


SE 

CA 

CD 


CALL 


IE 

CB 

D3 


HOVES 

/MOVE THE FIRST FROM BUFF2 BACH 

SE 

CC 

OE 


1 

/ IN TO THE SYMBOL TABLE 

IE 

CD 

2A 

FNXSYM* 

LHLD 


OE 

CE 

32 


LINCNT 



216 




TYCHON EDITOR-ASSEMBLER V-3 


PAGE 18-007 


9E 

CF 

18 

0 

«E 

DO 

C3 

JHP 

OE 

DI 

76 

BSORT2 

«E 

D2 

OE 

0 

• E 

D3 

1A MOVES* 

LDAXD 

OE 

DA 

77 

MOVMA 

OE 

D5 

23 

IMXH 

OE 

Dò 

13 

INXD 

OE 

D7 

FE 

CPI 

OE 

D8 

3D 

*»* 

OE 

D9 

C2 

JNZ 

OE 

DA 

D3 

MOVES 

OE 

DB 

OE 

0 

OE 

DC 

1A 

LDAXD 

OE 

DD 

77 

HO IMA 

OE 

DE 

13 

INXD 

OE 

DF 

23 

IMXH 

OE 

ED 

1A 

LDAXD 

OE 

E1 

77 

MOVMA 

OE 

E2 

13 

IMXD 

OE 

E3 

23 

INXH 

OE 

E4 

C9 

RET 
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IE 

ES 

CD 

LASTPG. 

C ALL 


OE 

E6 

9A 


ERRO UT 

/TYPE OUT THE A OF ERRORS 

IE 

ET 

• r 


0 


IE 

ES 

3A 


LDA 

/THEN PRINT ENOUGH CRS AND LFS TO 

BE 

E9 

38 


PAGCNT 


IE 

EA 

18 


0 


IE 

EB 

3D 


DCRA 

/FINISH THE PAGE 

IE 

EC 

4E 


MOVC A 


IE 

ED 

CD 

MORLP» 

CALL 

/PRINT A CR 4 LF 

BE 

EE 

39 


CRLE 


IE 

Er 

02 


0 


IE 

ro 

OD 


DCRC 

/PRINT ENOUGH YET 7 

IE 

ri 

C2 


JNZ 

/NO. TYPE ANOTHER SET 

IE 

r2 

ED 


NORLP 


IE 

ra 

OE 


0 


IE 

F4 

CD 


CALL 

/YES. END Or THE PAGE 

IE 

rs 

84 


SIXSPC 

/TYPE 6 ADDI TI ON AL CRS « LFS 

IE 

F6 

or 


0 


OE 

rr 

CD 


CALL 


IE 

n 

90 


DASH 

/THEN TYPE 6 DASHES 

OE 

r> 

or 


0 


OE 

FA 

C3 


JNP 


BE 

FB 

84 


SIXSPC 

/THEN riNALLY. 6 MORE CRS « LFS 

IE 

re 

or 


1 


IE 

rD 

3A 

r IN PAG. 

LDA 

/GET THE NUMBER OF LINES PRINTED 

OE 

re 

38 


PAGCNT 

/SO FAR. 

OE 

rr 

18 


0 


or 

01 

rE 


CPI 

/NEW PAG ET 

ir 

li 

36 


066 


or 

02 

CS 


RZ 


ir 

03 

4r 


NO ve A 

/NO. GET THE NUMBER OF 

ir 

04 

CD 

NXTCR. 

CALL 

/LINES LErT OVER. 

or 

05 

39 


CRLF 


or 

06 

02 


0 


or 

07 

OD 


DCRC 


or 

08 

C2 


JNZ 


ir 

09 

04 


NXTCR 


ir 

OA 

or 


0 


or 

OB 

C3 


JNP 

/AFTER FIN ISHING THE PAGE. TYPE 

or 

OC 

3B 


PAQEI 

/THE DASHES AND THE T1TLE ON THE 

or 

OD 

or 


1 

/NEXT PAGE 




/THIS 1S JUST USED POR TYPING OUT ERROR MESSAGES 




/PUSHH 

AND POPH 

BEFORE AND AFTER ENTRY 1F THEY ARE 

ir 

OE 

CD 

LISTI. 

CALL 

/ENTER VI TH HAL POINTING 

or 

or 

39 


CRLF 

/TO THE ERROR MESSAGE 

ir 

10 

02 


0 


or 

11 

CD 


CALL 


or 

12 

7A 


TOUT 

/PRINT THE ERROR MESSAGE 

or 

13 

05 


0 


or 

14 

21 


LXIH 


or 

15 

2C 


LN ER 

/THEN PRINT *AT LINE #* 
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or 

16 

12 

0 


or 

17 

CD 

CALL 


or 

18 

7A 

TOUT 

/THEN PRINT THE BLOCK NUMBER AND LINE 

or 

19 

05 

0 

/N UH BER VHERE THE ERROR OCCURRED 

or 

1A 

21 

LXIH 


or 

1B 

2D 

TH0U*2 

/POINT TO HUN. THOU (BLOCK COUNTER) 

or 

1C 

18 

0 


or 

1D 

OE 

M VI C 


or 

1E 

02 

002 


or 

ir 

CD 

CALL 


or 

20 

1C 

MPRINT 

/TYPE OUT THE BLOCK # <00-991 

or 

21 

06 

0 


or 

22 

3E 

(IVI A 


or 

23 

2D 


/NOV TYPE A DASH 

or 

24 

CD 

CALL 


or 

25 

or 

100 

/I-O DEVI CE* OUTPUT TYPE 

or 

26 

18 

0 


or 

27 

OE 

MVIC 


or 

28 

04 

004 

/H*L POINT TO MSB Or LINE CO IN TER 1 

or 

29 

CD 

CALL 

/JUST SET THE # CNTR TO 4 

or 

2A 

1C 

N PRINT 

/AND PRINT THE LINE NUMBER 

or 

2B 

06 

0 


or 

2C 

21 

LXIH 

/NOV INCREMENT THE 

or 

2D 

48 

NMBERR 

/NUMBER Or ERRORS COUNTER 

or 

2E 

18 

0 


or 

2r 

34 

IN RM 


or 

30 

C3 

JMP 

/AND THEN PRINT A CR. LF 

or 

31 

39 

CRLP 


or 

32 

02 

0 





/*PG* IS RESPONSIBLE 70R DIVIDING THE ASSEMBLEO 




/PRINTOUT INTO 
/NUMBER. 

PAGES. TYPING THE TITLE AND PAGE 

or 

33 

3A 

PG. LDA 

/GET THE CO IN TER POR THE » Or 

or 

34 

38 

PAGCNT 

/CR 4 LF'S TYPED ON THIS PAGE SO PAR. 

or 

35 

18 

0 


or 

36 

3D 

OCRA 

/DECREMENT AND SAVE THE NEW COUNT 

or 

37 

32 

STA 


or 

38 

38 

PAGCNT 


or 

39 

18 

0 


or 

3A 

CO 

mz 

/RETUJW ir COUNT 1S NOT 0. 

or 

3B 

CD 

PAG EU CALL 

/COUNT IS 0/ START A NEW PAGE 

or 

3C 

84 

SIXSPC 

/TYPE 6 CfLLr'S TO COMPLETE THIS PAGE 

or 

3D 

or 

0 


or 

3E 

CD 

PAGE2. CALL 


or 

3r 

90 

DASH 

/THEN TYPE A LINE VITH 6 DASHES ON IT. 

or 

40 

or 

0 


or 

41 

OE 

MVIC 

/NOV TYPE ONLY 2 CR « Lr'S 

or 

42 

02 

002 

/AFTER THE DASHED LINE* 

or 

43 

CD 

CALL • 


or 

44 

86 

SIXSPC+2 

or 

45 

or 

0 


or 

46 

OE 

MVIC 

/NOV PRINT 6 SPACES FROH THE LEFT MARGIN 
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or 

47 

06 

006 


or 

48 

3E 

M VI A 


or 

49 

AO 

240 


or 

4A 

CD 

CALL 


or 

4B 

88 

SIXSPC+4 

or 

4C 

or 

0 


OF 

40 

E5 

PUSHH 

/SAVE THE TEXT POINTER 

or 

4E 

21 

LXIH 

/AND SET H4L TO POINT TO THE 

or 

4F 

9B 

TYASS 

/MESSAGE * TYCHON EDI TOR- ASSEMBL 

or 

SO 

11 

0 


or 

51 

CO 

CALL 

/NOV PRINT THE NESSAGE 

or 

52 

7A 

TOUT 


OF 

53 

05 

0 


or 

54 

OE 

SPCOUT, MVIC 

/THEN TYPE 24 SPACES OVER 

or 

55 

18 

030 


or 

56 

3E 

M VI A 


or 

57 

AO 

240 


or 

58 

CO 

CALL 


or 

59 

88 

SIXSPC+4 

or 

5A 

OF 

0 


OF 

5B 

23 

IN XH 


or 

5C 

CD 

CALL 

/PAGE <#) 

or 

5D 

7A 

TOUT 


or 

5E 

05 

0 


or 

sr 

21 

LXIH 

/NOV TYPE THE BLOCK N UN BER 

or 

60 

2D 

TH0U*2 


or 

61 

18 

0 


or 

62 

OE 

HVIC 


or 

63 

02 

002 

/2 DIGITS TO TYPE 

OF 

64 

CD 

CALL 


OF 

65 

1C 

N PRINT 


OF 

66 

06 

0 


or 

67 

3E 

NVIA 


or 

68 

20 

*-* 


OF 

69 

CD 

CALL 


or 

6A 

OF 

100 


or 

6B 

18 

0 


or 

6C 

3A 

LDA 

/GET THE PAGE N IH BER 

or 

60 

47 

PAOJHB 


or 

6E 

18 

0 


or 

6F 

3C 

IN RA 

/INCREMB4T IT 

OF 

70 

32 

STA 

/STORE IT 

or 

71 

47 

PAOOHB 


or 

72 

18 

0 


or 

73 

CD 

CALL 

/AND NOV PRINT IT 

or 

74 

50 

DECOUT 


or 

75 

10 

0 


or 

76 

CD 

CALL 


OF 

77 

39 

CHLF 


or 

78 

02 

0 


or 

79 

El 

POPH 


OF 

7A 

3E 

NVIA 


or 

7B 

36 

066 


or 

7C 

32 

STA 
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ir 

7D 

38 


PAGGI T 



or 

7E 

18 


0 



or 

7 r 

OE 


M VI C 



or 

80 

02 


002 



or 

81 

C3 


JMP 



or 

82 

86 


SIXSPC*2 


or 

83 

or 


0 



or 

84 

OE 

SIXSPC, 

M VI C 

/PRIMT 6 LIME PEEDS* 


or 

85 

06 


006 



or 

86 

3E 


M VI A 



or 

87 

SA 


212 



or 

88 

CD 


CALE 



or 

89 

or 


100 



or 

8A 

18 


0 



or 

8B 

OD 


DCRC 



or 

se 

C2 


jnz 



or 

6D 

88 


SIXSPCT4 


or 

8E 

OF 


0 



or 

8r 

C9 


RET 



or 

90 

OE 

DASH* 

M VI C 

/PRINT SIX DASHES <-). 


0 F 

91 

06 


006 



or 

92 

3E 


M VI A 



or 

93 

AD 


255 



or 

94 

CD 


CALL 



or 

95 

88 


SIXSPC+4 


OF 

96 

or 


0 



or 

97 

C3 


JMP 



or 

98 

39 


CRL r 



or 

99 

02 


0 



or 

9A 

CD 

ERRO UT, 

CALL 

/TYPE OUT THE t or ERRORS 


or 

9B 

39 


CRL F 

/THAT OCCURRED AS VE ASSEMBLEO THE 

or 

9C 

02 


0 

/PROGRAAM. 


or 

9D 

21 


LXIH 



or 

9E 

7B 


ERROR 



or 

9F 

1 1 


0 



or 

AO 

CD 


CALL 



or 

Al 

7A 


TOUT 



or 

A2 

OS 


0 



or 

A3 

3A 


LDA 



• F 

A4 

48 


NMBERR 



or 

A5 

18 


0 



or 

A6 

C3 


JMP 



or 

A7 

50 


DECO UT 



or 

A8 

IO 


0 






/*BYTE' 

1S USED 

TO BREAK UP THE 8 BIT 





/MNEMONICA data 

OR ADDRESS VALUE 





/ IN TO A 

2 BIT /WD A 6 BIT WORD. 


or 

A9 

3A 

BYTE, 

LDA 

/*PORL* IS USED TO STORE THE 

ANSVER 

or 

AA 

41 


PO RL 

/TO THE QUESTIOM *AUTO-LOAD* 

DURING 

or 

AB 

18 


0 

/THE ASSEMBLY PROCESS. 
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or 

AC 

FE 

CPI 

/AUTO-LOAD7 

0F 

AD 

59 

•Y* 


OF 

AE 

C2 

JNZ 

/NO» THEN JUST PINCH THE VALUE 

OF 

AF 

E1 

NOAUTO 

/ON THE "IOP" DEVI CE. 

OF 

BO 

OF 

0 


OF 

B1 

E5 

PUSHH 

/YES. SAVE SOME REGI STERS* 

OF 

82 

D5 

PUSHD 


OF 

B3 

C5 

PUSHB 


OF 

B4 

1 1 

LXI D 

/LOAD DAE VITH THE LOVEST ADDRESS 

OF 

B5 

00 

START 

/USED TO STORE THE TEA PROGRAM. 

OF 

B6 

00 

0 


OF 

B7 

21 

LX1H 

/LOAD HAL VITH THE HIQHEST ADDRESS 

OF 

B8 

C2 

END 

/USED TO STORE THE TEA PROGRAM. 

OF 

B9 

14 

0 


OF 

BA 

CD 

CALL 

/NOV SEE IF "ADDCNT" IS BETVEEN 

OF 

BB 

FA 

CKKOL 

/THESE TVO ADDRESSES. IF SO. PRINT "OL' 

OF 

BC 

OF 

0 

/IF VE ARE OK. RETUH* 

OF 

BD 

2A 

LKLD 

/NOV MAKE SURE THAT * ADDCNT - IS NOT 

OF 

BE 

22 

TXTBUF 

/BETVEEN * TXTBUF - AND "SYMADF". 

OF 

BF 

18 

0 


OF 

CO 

EB 

XCHG 


OF 

CI 

2A 

LKLD 

/-TXTBUF - IS THE BEGINNING Or THE 

OF 

C2 

3B 

SYMADF 

/TEXT BUFFER AND - SYMADF" IS THE LAST 

OF 

C3 

18 

0 

/ADDRESS USED BY THE SYMBOLIC ADDR. TAB 

OF 

C4 

CD 

CALL 

/IF THERE IS OVERLAP» PRINT "OL" 

OF 

CS 

FA 

CKKOL 

/IF VE ARE OK» RETUJN. IF NOT» 

OF 

C6 

or 

0 

/PRINT - OL. - 

OF 

C7 

2A 

LKLD 

/NOV MAKE SURE THAT VE ARE NOT TRYING 

OF 

C8 

12 

BYTAB 

/SAVE THE VALUE IN MEMORY IN THE 

OF 

C9 

18 

0 

/-DEFINED-BYTE - TABLE 

OF 

CA 

EB 

XCHG 

/VHICH GOES FROM "BYTAB - UP TO 

OF 

CB 

2A 

LKLD 

/"ENDRAM. " 

OF 

cc 

24 

ENDRAM 


OF 

CD 

18 

0 


OF 

CE 

CD 

CALL 

/IF THERE IS OVERLAP. PRINT "OL. " 

OF 

cr 

FA 

CHKOL 

/OTHERVI SE» RETURN. 

OF 

DO 

OF 

0 


OF 

DI 

1 1 

LXID 

/NOV MAKE SURE THAT VE ARE NOT SAVING 

OF 

D2 

00 

10TEST 

/THE VALUE IN THE TEMPORARY STORAGE 

OF 

D3 

18 

0 

/AREA» STACX. ETC. 

OF 

D4 

21 

LX1H 


OF 

D5 

28 

BUFF2+290 

OF 

D6 

19 

0 


OF 

D7 

CD 

CALL 

/IF THERE IS OVERLAP HERE» PRINT "OL. " 

or 

D6 

FA 

CHKOL 

/FINALLY» IF THERE IS NO OVERLAP» 

OF 

D9 

OF 

0 

/THE VALUE CAN BE SAVED IN MEMORY. 

or 

DA 

3A 

LDA 

/a ET THE EIGHT-BIT VALUE 

or 

DB 

36 

UN E VAL 


OF 

DC 

18 

0 


OF 

DD 

77 

HO UNA 

/SAVE THE VALUE IN THE MEMORY LOCATION 

or 

DE 

CI 

PO PB 

/ADDRESSED BY "ADDCNT." HAL ARE LOADED 

or 

DF 

DI 

POPD 

/VITH THE CONTENT OF "ADDCNT" BY THE 

OF 

EO 

E1 

POPH 

/"CHKOL* SUB ROUTINE. 

or 

E1 

3A 

NOAUTO» LDA 

/REGARCLESS OF VHETHER OR NOT THE 
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or 

E2 

36 


UN E VAL 

/VALUE VAS *AUTOLOADED- * GET IT AGAIN 

or 

E3 

18 


0 


or 

ZA 

4F 

BYTE!* 

HO VCA 

/SAVE IT IN C 

or 

E5 

3A 


LDA 

/GET THE CURRENT CHECKSUH 

or 

E6 

3F 


CKKSUM 


or 

E7 

18 


t 


or 

E8 

81 


ADDC 

/ADD THE VALUE TO BE PUICHED 

or 

E9 

32 


STA 

/AND SAVE THE NEW CHECK SUH 

or 

EA 

3r 


CKKSUM 


or 

EB 

18 


0 


or 

EC 

79 


HOVAC 

/GET THE VALUE BACK 

or 

ED 

E6 

BYTE2. 

ANI 

/PUNCH THE 2 HSBS 

or 

EE 

CO 


300 


or 

Er 

07 


RLC 


or 

ro 

07 


RLC 


or 

FI 

CD 


C ALL 


or 

rz 

09 


IOP 

/I-O DEVI CE/ PUNCH TYPE 

or 

r 3 

18 


0 


or 

r« 

79 


HOVAC 

/THEN PINCH THE 6 LSBS. 

or 

rs 

E6 


/MI 


or 

r6 

3F 


077 

/I 2-BIT BYTE AND 1 6-BIT BYTE- 

or 

F7 

C3 


JMP 


or 

F8 

09 


IOP 

/I-O DEVI CE# PUNCH TYPE 

or 

F9 

18 


0 


or 

EA 

ES 

CHKOL» 

PUSHK 

/PUT THE HI ADDRESS ON THE STACK 

or 

FB 

CI 


POPE 

/Mi D POP IT INTO BiC 

or 

re 

2A 


LHLD 

/LOAD REGI STER PAIR H VITH 

or 

FD 

34 


ADDCNT 

/THE ADDRESS VERE TrfE BYTE IS 

or 

FE 

18 


0 

/TO BE STORED 

or 

rr 

7D 


HO VAL 


io 

00 

93 


SUBE 


IO 

01 

7C 


MOV AH 


10 

02 

9A 


SBBD 

/IS ADDCNT < LO ADDRESS? 

10 

03 

D8 


RC 

/YES- SO RETURN 

10 

04 

79 


HOVAC 


IO 

OS 

95 


SUBL 


IO 

06 

78 


HOVAB 


IO 

07 

9C 


SBBH . 


10 

08 

D8 


RC 

/ADDCNT > HI ADDRESS 

10 

09 

21 

YESOL- 

LXIK 

/THERE IS 0 VERLAP# SO LO AD REG- 

10 

OA 

69 


OVLAP 

/I STER PAIR H VITH THE STARTING 

10 

OB 

11 


0 

/ADDRESS FOR THE ERROR HESSAGE *OL* 

IO 

OC 

CD 


C ALL 

/PR1NT THE ERROR HESSAGE AND THE 

10 

OD 

OE 


LISTI 

/LINE NUMBER VH ERE THE OVERLAP 

10 

OE 

or 


0 

/OCCURRED. 

10 

or 

AF 


XRAA 

/THEN DISABLE THE AUTO-LOADER 

IO 

10 

32 


STA 

/ FEATURE# SO THAT VE ONLY GET ONE 

10 

11 

41 


PORL 

/ERROR HESSAGE- RATHER THAN A 

10 

12 

18 


0 

/BUNCH Or THEM. 

10 

13 

CI 


POPE ' 


10 

14 

DI 


PO PD 


10 

15 

Et 


POPH 


10 

16 

33 


IMXSP 

/DESTROY THE RETUIM ADDRESS FOR 
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10 

17 

33 

INXSP 

/THE "CHXOL" SUBROUTINE. 

IO 

!8 

C3 

JMP 

/AND PUNCH THE CONTENT OF 

10 

19 

E1 

NOAUTO 

/•MNEVAL" ON THE IOP DEVICE. 

IO 

IA 

or 

0 



/"SPCIT" PRINTS A DIFFERENT NUHBER OF SPACES DORING 
/THE THIRD PASS, DEPD1DING ON WHETHER HEX OR OCTAL 
/NUMBERS ARE PRINTED FOR ADDRESS AND DATA VALUES. 


IO 

1B 

0E 

SPCIT, 

M VI C 

10 

IC 

OD 


015 

10 

1D 

3A 


LDA 

10 

1E 

3E 


HORO 

10 

IF 

18 


0 

10 

20 

FE 


CPI 

10 

21 

48 


*H* 

10 

22 

C2 


JNZ 

10 

23 

27 


OSPC 

10 

24 

10 


0 

10 

25 

0E 


MVIC 

10 

26 

0A 


012 

10 

27 

3E 

OSPC, 

M VI A 

10 

28 

A0 


240 

10 

29 

C3 


JMP 

10 

2A 

88 


SIXSPC*4 

10 

2B 

OF 


0 


/*OD* IS A COMMON ERROR, SO THIS SUBROUTINE PRINTS 
/THE UD ERROR MESSAGE FOLLOVED BY THE LINE NUMBER. 


10 

2C 

E5 UDO UT, 

PUSHH 

10 

2D 

21 

LXIH 

10 

2E 

91 

ERRORE 

10 

2F 

11 

0 

10 

30 

CD 

CALL 

10 

31 

OE 

LISTI 

10 

32 

0F 

0 

10 

33 

E1 

POPH 

IO 

34 

C9 

RET 


/“CLRREG" SETS SOME COINTERS AND TEMPORARY STORAGE 
/LOCATIONS TO ZERO BEPORE EACH PASS OF THE ASSEMBLER. 


10 

35 

AF 

CLRREG, XRAA 




10 

36 

32 

STA 

/SET THE 

"DEFIN ED 

ADDRESS INDICATORE 

10 

37 

16 

ADCHX 

/TO ZERO. 



10 

38 

18 

0 




10 

39 

32 

STA 

/SET THE 

CHECK SUN 

TO eoo 

10 

3A 

3F 

CHKSIM 




10 

3B 

18 

0 




10 

3C 

32 

STA 

/SET THE 

- CURRO! T 

PAGE NUHBER* TO 000 

10 

3D 

47 

PAOOMB 




10 

3E 

18 

0 




IO 

3F 

32 

STA 

/CLEAR THE ERROR CO UN TER TO 000 
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1( 

40 

48 

NMBERR 



IO 

41 

18 

0 



IO 

42 

2E 

CLRRGI# MVIL 



IO 

43 

00 

. 000 



10 

44 

26 

HVIH 



10 

45 

00 

000 



10 

46 

22 

SHLD 

/THEN SET THE "CURRENT ADDRESS 

CO UN TER* 

10 

47 

34 

ADDCNT 

/TO 0 00 000. THIS IS THE DEFAULT 

10 

48 

18 

0 

/STARTXMG ADDRESS 


10 

49 

22 

SHLD 



10 

4A 

32 

LINQIT 

FALSO SET THE LIME CO IN TER FOR 


IO 

4B 

18 

0 

/ERROR HESSAGES TO 0. 


10 

4C 

2A 

LHLD 

/LO AD REGI STER PAIR H HITH THE 

STARTIMG 

10 

4D 

22 

TXTBUF 

/ADDRESS OF THE TEXT BUFFER. 


10 

4E 

18 

0 



10 

4F 

C9 

RET 




/•DECOUT* PRIMTS THE CONTENT OF THE A REGI STER 
/ON THE *100* DEVI CE IH THE FORM OF A THREE-DIGIT 
/ DEC I MAL NIX BER (0-255). 


10 

50 

D5 

DECOUT# 

PUSHD 

10 

51 

E5 


PUSHH 

10 

52 

F 5 


PUSHPSV 

10 

53 

AF 


XRAA 

10 

54 

4F 


HOVCA 

10 

55 

57 


MOVDA 

10 

56 

5F 


MOVEA 

10 

57 

FI 


POPPSW 

10 

58 

47 


MOVBA 

10 

59 

D6 

HUN# 

SUI 

10 

5A 

64 


144 

10 

5B 

DA 


JC 

10 

5C 

62 


TEN 

10 

5D 

10 


0 

10 

5E 

1C 


IMRE 

10 

5F 

C3 


JMP 

10 

60 

59 


H IN 

10 

61 

10 


0 

10 

62 

C6 

TEN# 

ADI 

10 

63 

64 


144 

10 

64 

D6 


SUI 

10 

65 

0A 


012 

10 

66 

DA 


JC 

10 

67 

6D 


TIMU 

10 

66 

10 


0 

10 

69 

14 


IMRD 

10 

6A 

C3 


JMP 

10 

6B 

64 


TEN* 2 

IO 

6C 

10 


0 

10 

6D 

C6 

TIMU# 

ADI 

10 

6E 

0A 


012 

10 

6F 

4F 


MOVCA 

10 

70 

7B 


MOVAE 
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11 

71 

CD 


CALL 

It 

72 

24 


BCDOUT 

11 

73 

14 


1 

11 

74 

7A 

NOHUN* 

MOVAD 

11 

73 

CD 


CALL 

11 

71 

24 


BCDOUT 

11 

77 

• 4 


1 

11 

78 

79 

MOT», 

NOVAC 

11 

79 

CD 


CALL 

II 

7A 

24 


BCDOUT 

II 

7B 

04 


0 

11 

7C 

E1 


POPH 

II 

7D 

DI 


POPD 

II 

7E 

C9 


RET 
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/THESE ARE THE ROUTINES THAT THE 
/PSEUDO-OPS “DW“ AND “DB" USE. 



7 r 

CD 

DV# 

CALL 

/ONLY IF ITS PASS 2 (PASS-12 0-P) 


so 

F3 


PA5SCX 

/DO WE IN TER THE DEFIN ED WORD 


si 

10 


0 

/INTO THE SYMBOL 1C ADDRESS TABLE. 


82 

CD 


CALL 

/ITS PASS 2. FIND THE CHARACTER 


83 

0A 


FNDSYH 

/STRING AFTER THE “DW* 


84 

1 1 


0 



85 

EB 


XCHG 

/NOW SEE IF ITS IN THE 


86 

06 


HVIB 

/SYHBOLIC ADDRESS TABLE AL READY 


87 

03 


003 



88 

CD 


CALL 



89 

32 


CKXTBI 

/CHECK THE TABLE 


8A 

11 


0 



8B 

C2 


JNZ 

/ITS IN THE TABLE AL READY 


8C 

23 


PSEUDO 

/NOTHING ELSE TO DO* 


8D 

1 1 


• 



8E 

2A 

SYMENT, 

LHLD 

/OK» IN TER THE DEFINEO WORD 


8F 

45 


THPADD 

/THIS WAS SET BY “SEARCH* 


90 

18 


0 



91 

C3 


JMP 

/NOW SAVE THE SYMBOL 


92 

02 


NOSYN*3 

/AND THE ADDRESS 


93 

0B 


0 



94 

CD 

DB* 

CALL 

/ONLY IF ITS PASS 2 (PASS-120-P) 


95 

F3 


PASSCX 

/DO WE IN TER THE DEFIN ED BYTE 


96 

10 


0 

/INTO THE “BYTE TABLE*! “BYTAB“ 


97 

CD 


CALL 

/ITS PASS 2. FINO THE CHARACTER 


98 

OA 


FNDSYH 

/STRING AFTER THE “DB* 


99 

11 


0 



9 A 

EB 


XCHG 



9B 

CD 


CALL 

/IS IT IN THE “BYTAB" AL READY 7 


9C 

47 


CHXTB3 



9D 

1 1 


0 



9E 

C2 


JNZ 

/YES. PROCESS THE NEXT LINE OF CODE 


9F 

23 


PSEUDO 



A0 

1 1 


0 



Al 

2A 

DBOK* 

LHLD 

/ITS NOT IN THE TABLE. SO 

10 

A2 

45 


TMPADD 

/INTER IT (THPADD SET BY “SEARCH*» 


A3 

18 


0 



A4 

06 


HVIB 

/NOW C01MT HOW MANY CHARACTERS 


A5 

00 


000 



A6 

7E 

DBOK 1# 

HO VAM 

/WILL BE EN TERED INTO THE TABLE 


A7 

F E 


CPI 



A8 

20 


040 

/WE MUST HAVE A SPACE AFTER THE STRING 

10 

A9 

CA 


JZ 


10 

AA 

B 1 


B4DDB 

/DB AST 0 12 


AB 

10 


0 



AC 

23 


1NXH 

/INCRD4ENT THE POINTER 


AD 

04 


INRB . 

/AND THE COUNT 


AE 

C3 


JHP 



AF 

A6 


DBOK 1 


10 

B0 

10 


0 
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18 

B 1 

04 

ENDDB* 

IN RB 

/MAHE SPACE FOR THE • SIGN AND 

18 

B2 

04 


1NRB 

/NUMERI C VALUE 

18 

B3 

2A 


LHLD 


18 

BA 

12 


BYT AB 

/GET THE LAST ADDRESS USED FOR 

18 

B5 

16 


8 

/THE "BYTE TABLE" 

18 

B6 

7D 


NO VAL 


10 

B7 

90 


SUBB 


IO 

B8 

6F 


MOVLA 


18 

B9 

D2 


JNC 

/NO CARRY, DON *T DECREMENT THE 

10 

BA 

BD 


HOKNOV 

/H PART OF THE ADDRESS 

10 

BB 

18 


0 


IO 

BC 

25 


DCRH 

/INDERFLOV, SO DECREMB1T H BY 1 

10 

BD 

EB 

HOKNOV* 

XCHG 


IO 

BE 

2A 


LHLD 

/NOV SEE IF ITS GRÒ UN DOW INTO THE 

10 

BF 

3B 


SYNADF 

/END OF THE SYMBOLIC ADDRESS TABLE 

10 

CO 

18 


8 


18 

CI 

7B 


HOVAE 

/D4E ARE THE "BYTAB" SO THEY SHOULD 

10 

C2 

95 


SUBL 

/B1GGER THAN H4L OF "SYNADF* 

10 

C3 

47 


HOVBA 


IO 

C4 

7A 


HOVAD 


10 

C5 

9C 


SBBH 


10 

CO 

DA 


JC 

/NO. THE TABLE BOUNDARIES HAVE CROSSED 

IO 

C7 

23 


MN 

/TYPE THE "NE" - MEMORY EXCEEDED 

10 

C8 

OB 


0 

/ERROR MESSAGE* 

10 

C9 

EB 


XCHG 

/H*L ARE NOV "BYTAB" 

10 

CA 

22 


SHLD 


10 

CB 

12 


BYTAB 

/SAVE THE NEV. LOVER ADDRESS FOR 

IO 

CC 

18 


0 

/THE N EXT ENTRY INTO "BYTAB" 

10 

CD 

EB 


XCHG 

/DAE ARE "BYTAB" 

10 

CE 

2A 


LHLD 

/H*L POINT TO THE BEGINN1NG OF THE STRINO 

10 

CF 

45 


THPADD 


IO 

DO 

18 


0 


IO 

DI 

7E 

DBIN# 

MOVAM 

/GET A TEXT BUFFER CHARACTER AND 

IO 

D2 

FE 


CPI 

/STORE IT IN THE "BYTAB" 

IO 

D3 

20 


040 

/FIND THE SPACE TERMINATOR 7 

IO 

D4 

CA 


JZ 

/YES. THEN SAVE THE • AND THE N UN ERIC 

IO 

DS 

DD 


ADDEQ 

/VALUE OF THE DEFIN ED BYTE 

IO 

D6 

10 


0 


10 

D7 

12 


STAXD 

/NOT A SPACE. SAVE IT IN THE TABLE 

10 

D8 

23 


INXH 

/ IN CREMENT BOTH MEMORY POINTERS 

IO 

D9 

13 


1NXD 


10 

DA 

C3 


JMP 

/AND TRY ANOTHER CHARACTER 

IO 

DB 

DI 


DBIN 


10 

DC 

IO 


0 


10 

DD 

3E 

ADDEQ# 

H VI A 

/VE FOUND THE SPACE TEAlINATOR 

10 

DE 

3D 


075 

/SO SAVE AN • SIGN IN THE TABLE 

IO 

DF 

12 


STAXD 


IO 

EO 

DS 


PUSHD 

/SAVE THE "BYTAB" POINTER 

10 

Et 

CD 


CALL 

/NOV GET THE NUMERI C VALUE FOR 

10 

E2 

27 


THRNMB 

/THE CHARACTER STRINO 

10 

E3 

OD 


0 


10 

ZA 

C2 


JNZ 

/NUMBER VAS INTERPRETARLE 

IO 

E5 

EC 


DBINOK 


IO 

E6 

IO 


0 
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10 

E7 

CD 


CALL 

/BAD NUMBER, PRINT AN ERROR HESSAGE 

10 

E8 

OE 


ENOUT 


IO 

E9 

OD 


0 


10 

EA 

OE 


H VI C 

/SET THE NUMBER TO 000 

10 

EB 

00 


000 


IO 

EC 

DI 

DBINOXa 

POPD 


10 

ED 

13 


INXD 


10 

EE 

79 


HOVAC 


10 

EF 

12 


STAXD 

/SAVE THE VALUE IN THE TABLE 

10 

FO 

C3 


JHP 


IO 

FI 

23 


PSEUDO 

/AND GO TO THE N EXT LINE 

10 

F2 

11 


0 





/DETERNINE THE 

CURRENT PASS #. IF IT IS NOT 




/PASS 2, VE EXIT TO “PSEUDO* AND CONTINUE THE 




/ASSEMBLY PROCESS. 1F IT IS PASS 2. VE 




/RETUW 

TO THE 

CALLING ROUTINE- 

IO 

F3 

3A 

PASSCX# 

LDA 


IO 

FA 

42 


PASS 

/QET THE PASS NUMBER 

10 

F5 

18 


0 


IO 

F6 

FE 


CP1 


10 

F7 

SO 


*P* 

/IF ITS *P“, ITS PASS 2 

10 

F8 

C2 


JN Z 

/ITS NOT PASS TVO# SO RETUFN 

10 

F9 

06 


PASSEX 


IO 

FA 

11 


0 


10 

FB 

3A 


LDA 

/IT IS PASS TVO# IS THE USER TRYING 

10 

FC 

16 


ADCHX 

/TO USE THE DB OR DV PSEUDO-OP AFTER 

10 

FD 

18 


0 

/AN ADDRESS HAS BEEN DEFIN ED BY AN * 

10 

FE 

B7 


ORAA 


10 

FF 

CB 


RZ 

/ITS OK# NO ADDRESS HAS BEEN DEFIN ED 

11 

OD 

21 


LX1H 

/NO GOOD# USING DB OR DV AFTER A 

11 

01 

75 


DEFER 

/•# SO PRINT THE *DE* - DEFINÌ TION 

II 

02 

11 


0 

/ERROR HESSAGE 

11 

03 

C3 


JHP 

/TRIS IS A FATAL ERROR 

11 

04 

26 


FATAL 


11 

05 

OB 


0 


11 

06 

El 

PASS EX, 

POPH 

/DESTROY THE RETURN ADDRESS 

11 

07 

C3 


JHP 

/OF THE CALLING ROUTINE AND CONTINUE 

11 

08 

23 


PSEUDO 

/THE ASSEMBLY PROCESS 

II 

09 

11 


0 


11 

OA 

2A 

FNDSYM, 

LHLD 

/FIND THE FIRST CHARACTER AFTER 

11 

OB 

30 


TFMLIN 

/THE "DB- OR 'DV 

II 

OC 

18 


0 


11 

OD 

23 


INXH 

/GET PAST THE 'DB" OR "DV 

11 

OE 

23 

FSI# 

1NXH 


II 

OF 

7E 


MOVAM 

/SPACE TERMINATOR YET 7 

11 

IO 

FE 


CPI 


11 

II 

20 


040 


11 

12 

CA 


JZ 


11 

13 

OE 


FSI 


11 

14 

11 


0 
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11 

15 

FE 


CPI 


11 

16 

0A 


LF 


11 

17 

DA 


JC 


11 

18 

OE 


FS 1 

/TABS BETVEEN THE DB OR DV Mi D THE STRING 

11 

19 

11 


0 


11 

1A 

FE 


CPI 


11 

1B 

OD 


CR 

/VE FOWD A CARRIAGE RETURN BUT NO STRING 

11 

1C 

C2 


JNZ 


11 

ID 

2C 


FSLS 

/NO# SEE IF IT VAS A SLASH POR A COMMENT 

11 

1E 

1 1 


0 


11 

ir 

E 1 

NOFSYM# 

POPH 

/DESTROY THE RETURN ADDRESS 

11 

20 

CD 


CALL 

/POR TNDSYM' AND PRINT UD AT XX-NNNN 

11 

21 

2C 


UDO UT 


11 

22 

10 


0 


11 

23 

CD 

PSEUDO# 

CALL 

/SHOULD VE TYPE OUT THE PSEUDO-OP 7 

11 

24 

E4 


SPECL 1 


11 

25 

08 


0 


11 

26 

CD 

PS1# 

CALL 


11 

27 

C7 


NODATA 


11 

28 

OD 


0 

/FIN D THE NEXT LINE OF CODE 

11 

29 

C3 


JMP 


11 

2A 

89 


GENENT 

/AND JUNP TO THE GENERAL ENTRY P01NT 

11 

2B 

09 


0 


11 

2C 

FE 

FSLS# 

CPI 


11 

2D 

2F 


*/• 

/SLASH FOR A COMMENT 7 

11 

2E 

CA 


JZ 


11 

2 r 

IF 


NOFSYM 

/YES. SO VHERE'S THE STRING 7 

11 

30 

11 


0 

/THERE IS NONE# SO ERROR 

11 

31 

C9 


RET 

/OK# VE MUST HAVE HAL POINTING 
/TO THE BEGINNING OF THE STRING 

11 

32 

2A 

CHKTB1# 

LHLD 

/THIS IS CALL ED BY THE "DV ROUTINE 

11 

33 

39 


SYMADD 


11 

34 

18 


0 


li 

35 

OE 

CKKTB2# 

M VI C 


11 

36 

3D 


075 

/SEARCH TERMINATOR 

11 

37 

CD 


CALL 


11 

38 

6E 


SEARCH 

/SEARCH THE TABLE FOR AN 

11 

39 

OB 


0 

/1 DENTICAL ENTRY 

11 

3A 

FE 


CPI 


11 

3B 

9B 


BTERN 


11 

3C 

C8 


RZ 

/FINO THE END OF THE TABLE 7, YES 

11 

3D 

21 


LXIH 

/NO# THEN THERE IS AL READY AN ENTRY 

11 

3E 

94 


REDEF 

/VITH THE SANE NANE# SO ERROR 

11 

sr 

11 


0 

/“REDEF" 

11 

40 

CD 


CALL 


11 

41 

OE 


LISTI 


11 

42 

OF 


0 


11 

43 

AF 


XRAA 

/SO HE CAN JNZ TO ANY ERROR ROUTINES 

11 

44 

FE 


CPI 


11 

45 

FF 


377 


11 

46 

C9 


RET 


11 

47 

2A 

CHKTB3# 

LHLD 

/THIS IS FOR THE "BYTAB* SEARCH USED 

li 

48 

12 


BYT AB 

/VHEN VE HAVE A *DB“ PSEUDO-OP 


230 




TYCHON EDITOR-ASSEMBLER V-3 


PACE 21-OS 


II 

49 

18 

0 

11 

4A 

«6 

H VI B 

II 

4B 

02 

112 

II 

4C 

C3 

JNP 

11 

4D 

35 

CHKTB2 

11 

4E 

11 

0 
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11 

4F 

80 

TAS» 

215 


11 

SO 

8A 


212 


11 

SI 

CD 


315 

/H OR T 7 

11 

52 

AO 


240 


11 

53 

CF 


317 


11 

SA 

02 


322 


11 

55 

AO 


240 


11 

56 

D4 


324 


11 

57 

AO 


240 


11 

58 

BF 


277 


II 

59 

AO 


240 


11 

SA 

00 


000 


11 

5B 

8D 

AUTO» 

215 


11 

SC 

8A 


212 


11 

50 

41 


101 


II 

5E 

55 


125 

/AUTO-LO AD? 

11 

5F 

54 


124 


11 

60 

4F 


117 


11 

61 

20 


055 


11 

62 

4C 


1 14 


11 

63 

4F 


117 


II 

64 

41 


101 


11 

65 

44 


104 


11 

66 

AO 


240 


II 

67 

BF 


277 


11 

68 

00 


000 


11 

69 

4F 

OVLAP» 

117 

/OVER-LAP ( US ED DUR1NG AUTO-LOAD) 

11 

6A 

4C 


114 


11 

6B 

00 


000 


11 

6C 

CE 

N Z ERO * 

316 

/NO ZERO 

11 

6D 

DA 


332 


11 

6E 

00 


000 


11 

6F 

C2 

BN» 

302 

/BAD NIMBER 

11 

70 

CE 


316 


11 

71 

00 


000 


11 

72 

co 

ME» 

315 

/MEMORY EXCEEDED 

11 

73 

C5 


305 


11 

74 

00 


000 


11 

75 

44 

DEFER» 

104 

/DE - DEFIN ITION (DB OR DV> ERROR 

11 

76 

45 


105 


11 

77 

00 


000 


II 

78 

4E 

NO ADR» 

116 

/NA - NO (DEFIN EDI •> ADDRESS 

11 

79 

41 


101 


11 

7A 

00 


000 


11 

7B 

CS 

ERRO R» 

305 

/ERRORS DETECTED 

11 

7C 

D2 


322 
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11 

7D 

D2 


322 

II 

7 E 

CF 


317 

II 

7 F 

D2 


322 

11 

80 

D3 


323 

11 

81 

A0 


240 

11 

82 

C4 


304 

11 

83 

C5 


305 

11 

84 

D4 


324 

11 

85 

CS 


305 

11 

86 

C3 


303 

II 

87 

D4 


324 

11 

88 

C5 


315 

11 

89 

C4 


304 

II 

SA 

A0 


240 

11 

8B 

BD 


275 

11 

8C 

A0 


240 

II 

8D 

00 


000 

II 

SE 

52 

RDY# 

122 

11 

8F 

BF 


277 

11 

90 

00 


000 

11 

91 

D5 

ERROR2# 

325 

11 

92 

C4 


304 

11 

93 

00 


000 

11 

94 

D2 

REDEF# 

322 

II 

95 

C5 


305 

II 

96 

C4 


314 

11 

97 

CS 


315 

11 

98 

C6 


306 

II 

99 

A0 


240 

11 

9A 

10 


101 

11 

9B 

D4 

TYASS# 

324 

11 

9C 

D9 


331 

11 

9D 

C3 


303 

11 

9E 

C8 


311 

11 

9F 

CF 


317 

II 

Al 

CE 


316 

11 

Al 

Al 


241 

11 

A2 

CS 


305 

11 

A3 

C4 


314 

II 

A4 

C9 


311 

11 

AS 

D4 


324 

11 

A6 

cr 


317 

11 

AT 

D£ 


322 

11 

A8 

AD 


255 

11 

A9 

CI 


301 

11 

AA 

D3 


323 

11 

AB 

D3 


323 

11 

AC 

CS 


3IS 

11 

AD 

CD 


315 

11 

AE 

C2 


312 


/R7 


/UD-IN DEFIN ED 


/RE-DEFIN ED 
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Il AF 
Il Bl 
11 Bl 
Il B2 
11 B3 
Il B4 
Il B5 
11 B6 
Il B7 
Il B8 
Il B9 
Il BA 
Il BB 
11 BC 


Il BD 
Il BE 
11 BF 
Il CO 
Il CI 
11 C2 
Il C3 
Il C4 
Il CS 

Il C6 
Il C7 
11 C8 
11 C9 
Il CA 
Il CB 
Il CC 
11 CD 


11 CE 
Il CF 
11 DO 
Il DI 
Il D2 
11 D3 
11 DA 
11 DS 
Il D6 
11 D7 
11 D8 
Il D9 

11 DA 
11 DB 
Il DC 
11 DD 
Il DE 
Il DF 


CC 


314 

CS 


315 

D2 


322 

AO 


240 

D6 


326 

AD 


255 

B3 


263 

00 


000 

DO 


320 

CI 


301 

C7 


307 

C5 


305 

AO 


240 

00 


000 

41 

ALL ET. 

101 

42 


102 

43 


103 

44 


104 

45 


105 

48 


110 

4C 


1 14 

4D 


1 15 

FF 


377 

07 

ALL ET V. 

007 

00 


000 

01 


001 

02 


002 

03 


003 

04 


004 

05 


005 

06 


006 

C8 

HEXSRC. 

310 

C5 


305 

D8 


330 

CI 


301 

C4 


304 

CS 


305 

C3 


303 

C9 


311 

CD 


315 

CI 


301 

CC 


314 

00 


000 

CF 

OCTSRC. 

317 

C3 


303 

D4 


324 

CI 


301 

CC 


314 

00 


000 


/PAGE 


/H 

/L 

/M 

/TEftllN ATOR 


/HEXADECIMAL 


/OCTAL 
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/THIS TABLE CONTAINS ALL OF THE ASCII VALUES FOR THE 
/VALI D COMMANDS. THEY ARE IN Mi ORDER DETERMIN ED BY 
/THE ORDER OF THE JUMP INSTRUCTIONS IN THE -CMDJHP* 

/ TABLE. 


11 

E0 

44 

CHDTAB, 

104 

/IMDELETE 

11 

El 

58 


130 

/X-ASSEMBLE 

11 

E2 

4C 


1 14 

/L-LIST 

11 

E3 

53 


123 

/ S- 5EARCH 

11 

E4 

so 


120 

/P-PUNCH 

11 

ES 

51 


121 

/O-OUERY 

11 

E6 

4E 


1 16 

/N-NEXT 

11 

ET 

48 


no 

/H>HEXADECIMAL 

11 

E8 

4F 


1 17 

/O-OCTAL 

11 

E9 

52 


122 

/RaREADER 

11 

EA 

41 


tot 

/A* APPEN D 

II 

EB 

43 


103 

/C- CHANCE 

11 

EC 

49 


1 11 

/I-INSERT 

11 

ED 

45 


105 

/E- EXCHANGE 

11 

EE 

4D 


115 

/M-MEMORY LIM1TS 

11 

EF 

5A 


132 

/Z-RETUW TO SYSTEM MONITOR 

11 

F0 

42 


102 

/ B* BOOTSTRAP 

11 

FI 

00 


000 

/USER COMMAND 

11 

F2 

00 


000 


11 

F3 

4D 

H EAI Cs 

115 

/MEI (MEMORY EXCEEDED 1> 

11 

F4 

45 


105 


11 

F5 

21 


041 


11 

F6 

00 


000 


11 

F7 

8D 

SCIM» 

215 

/SOURCE CURRENTLY IN MEMORY 7 

11 

F8 

8A 


212 


11 

F9 

D3 


323 


11 

FA 

CF 


317 


11 

FB 

D5 


325 


11 

FC 

D2 


322 


11 

FD 

C3 


303 


11 

F E 

C5 


305 


11 

FF 

AO 


240 


12 

00 

C3 


303 


12 

01 

DS 


325 


12 

02 

D2 


322 


12 

03 

D2 


322 


12 

04 

C 5 


305 


12 

05 

CE 


316 


12 

06 

D4 


324 


12 

07 

CC 


314 


12 

08 

D9 


331 


12 

09 

A0 


240 


12 

0A 

C9 


311 

. 

12 

0B 

CE 


316 


12 

OC 

A0 


240 


12 

OD 

CD 


315 


12 

0E 

C5 


305 
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12 

or 

CD 


315 



12 

IO 

cr 


317 



12 

11 

D2 


322 



12 

12 

D9 


331 



12 

13 

AO 


240 



12 

14 

Br 


277 



12 

15 

AO 


240 



12 

16 

00 


000 



12 

17 

CI 

AYS. 

301 

/ARE YOU 

SUR E ? 

12 

18 

D2 


322 



12 

19 

CS 


305 



12 

1A 

AO 


240 



12 

1B 

D9 


331 



12 

IC 

cr 


317 



12 

1D 

D5 


325 



12 

1E 

AO 


240 



12 

ir 

D3 


323 



12 

20 

D5 


325 



12 

21 

D2 


322 



12 

22 

C5 


305 



12 

23 

AO 


240 



12 

24 

b r 


277 



12 

25 

AO 


240 



12 

26 

00 


000 



12 

27 

AO 

AT# 

240 

/ AT 


12 

28 

41 


101 



12 

29 

54 


124 



12 

2A 

AO 


240 



12 

2B 
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